fix: Fix tibble tests (#709)

r-lib · Dec 14, 2024 · 11822e2 · 11822e2
1 parent ed671e7
commit 11822e2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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, "]>")