diff --git a/R/finalize.R b/R/finalize.R
index 347ef9d5..19ec61b0 100644
--- a/R/finalize.R
+++ b/R/finalize.R
@@ -114,7 +114,7 @@ safe_finalize <- function(object, x, force = TRUE, ...) {
   if (all(is.na(object))) {
     res <- NA
   } else {
-    res <- finalize(object, x, force = TRUE, ...)
+    res <- finalize(object, x, force = force, ...)
   }
   res
 }