From 11822e2f9b89c76a0d72ce0ea47a88d3a7a8fb1c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Kirill=20M=C3=BCller?= Date: Sat, 14 Dec 2024 17:54:29 +0100 Subject: [PATCH] fix: Fix tibble tests (#709) --- R/glimpse.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/glimpse.R b/R/glimpse.R index 75c1b5030..1790b1552 100644 --- a/R/glimpse.R +++ b/R/glimpse.R @@ -142,7 +142,7 @@ format_glimpse.default <- function(x, ...) { if (is.null(dims)) { out <- format(x, trim = TRUE, justify = "none") - style_na_if(out, is.na(x)) + style_na_if(out, if (is.atomic(x)) is.na(x) else FALSE) } else { dims_out <- paste0(dims, collapse = " x ") paste0("<", class(x)[[1]], "[", dims_out, "]>")