fix is_free

Yunuuuu · Dec 17, 2024 · eeb6970 · eeb6970
1 parent 039afc7
commit eeb6970
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/free-.R b/R/free-.R
@@ -9,7 +9,7 @@ free <- function(free, ..., call = caller_call()) {
 
 is_free_plot <- function(x) is_ggalign_plot(x) && is_free(x@align)
 
-is_free <- function(x) inherits(x, "FALSE")
+is_free <- function(x) inherits(x, "Free")
 
 #' @export
 summary.Free <- function(object, ...) c(FALSE, FALSE)