From 447ddfcc384a6d502924a152ca2711960c6011c8 Mon Sep 17 00:00:00 2001
From: Davis Vaughan <davis@posit.co>
Date: Fri, 19 Dec 2025 07:36:23 -0500
Subject: [PATCH] Clear `dim` before calling `list_flatten()`

---
 NEWS.md    | 2 ++
 R/arrays.R | 6 +++++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/NEWS.md b/NEWS.md
index bb46fad61..e56db1810 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,5 +1,7 @@
 # purrr (development version)
 
+* Tweaks for compatibility with upcoming vctrs 0.7.0.
+
 # purrr 1.2.0
 
 ## Breaking changes
diff --git a/R/arrays.R b/R/arrays.R
index 514f740dd..360ea49f7 100644
--- a/R/arrays.R
+++ b/R/arrays.R
@@ -59,7 +59,11 @@ array_branch <- function(array, margin = NULL) {
     }
     as.list(array)
   } else {
-    list_flatten(apply(array, margin, list))
+    out <- apply(array, margin, list)
+    if (!is.null(dim(out))) {
+      dim(out) <- NULL
+    }
+    list_flatten(out)
   }
 }