diff --git a/packages/css/js/Css_Js_Core.ml b/packages/css/js/Css_Js_Core.ml
index e7e01cee3..bede9249f 100644
--- a/packages/css/js/Css_Js_Core.ml
+++ b/packages/css/js/Css_Js_Core.ml
@@ -1781,10 +1781,7 @@ let gridTemplateAreas l =
       | #Var.t as va -> Var.toString va
       | #Cascading.t as c -> Cascading.toString c )
 
-let filter x =
-  D
-    ( {js|filter|js},
-      x |. Std.Array.map Filter.toString |. Std.Array.joinWith ~sep:{js| |js} )
+let filter x = D ({js|filter|js}, Filter.filter x)
 
 module Shadow = struct
   type 'a value = string
diff --git a/packages/css/js/Css_Legacy_Core.ml b/packages/css/js/Css_Legacy_Core.ml
index 8d868558c..734da860e 100644
--- a/packages/css/js/Css_Legacy_Core.ml
+++ b/packages/css/js/Css_Legacy_Core.ml
@@ -1663,10 +1663,7 @@ let gridTemplateAreas l =
       | #Var.t as va -> Var.toString va
       | #Cascading.t as c -> Cascading.toString c )
 
-let filter x =
-  D
-    ( {js|filter|js},
-      x |. Std.List.map Filter.toString |. Std.List.joinWith ~sep:{js| |js} )
+let filter x = D ({js|filter|js}, Filter.filter x)
 
 module Shadow = struct
   type 'a value = string
diff --git a/packages/css/native/Css_Js_Core.ml b/packages/css/native/Css_Js_Core.ml
index e8504a948..8016cc901 100644
--- a/packages/css/native/Css_Js_Core.ml
+++ b/packages/css/native/Css_Js_Core.ml
@@ -1730,10 +1730,7 @@ let gridTemplateAreas l =
       | #Var.t as va -> Var.toString va
       | #Cascading.t as c -> Cascading.toString c )
 
-let filter x =
-  D
-    ( {js|filter|js},
-      x |. Std.Array.map Filter.toString |. Std.Array.joinWith ~sep:{js| |js} )
+let filter x = D ({js|filter|js}, Filter.filter x)
 
 module Shadow = struct
   type 'a value = string
diff --git a/packages/css/native/Css_Legacy_Core.ml b/packages/css/native/Css_Legacy_Core.ml
index 56d9289d0..30bd66d76 100644
--- a/packages/css/native/Css_Legacy_Core.ml
+++ b/packages/css/native/Css_Legacy_Core.ml
@@ -1618,10 +1618,7 @@ let gridTemplateAreas l =
       | #Var.t as va -> Var.toString va
       | #Cascading.t as c -> Cascading.toString c )
 
-let filter x =
-  D
-    ( {js|filter|js},
-      x |. Std.List.map Filter.toString |. Std.List.joinWith ~sep:{js| |js} )
+let filter x = D ({js|filter|js}, Filter.filter x)
 
 module Shadow = struct
   type 'a value = string
diff --git a/packages/css/native/shared/Css_AtomicTypes.ml b/packages/css/native/shared/Css_AtomicTypes.ml
index 19b3d4ad2..5246e7d60 100644
--- a/packages/css/native/shared/Css_AtomicTypes.ml
+++ b/packages/css/native/shared/Css_AtomicTypes.ml
@@ -2062,6 +2062,8 @@ module Filter = struct
     | #Url.t as u -> Url.toString u
     | #Var.t as va -> Var.toString va
     | #Cascading.t as c -> Cascading.toString c
+
+  let filter x = x |. Std.List.map toString |. Std.List.joinWith ~sep:{js| |js}
 end
 
 module BackgroundAttachment = struct
diff --git a/packages/css/native/shared/Css_AtomicTypes.mli b/packages/css/native/shared/Css_AtomicTypes.mli
index ed3ace70a..56718c3da 100644
--- a/packages/css/native/shared/Css_AtomicTypes.mli
+++ b/packages/css/native/shared/Css_AtomicTypes.mli
@@ -1341,6 +1341,7 @@ module Filter : sig
     ]
 
   val toString : t -> string
+  val filter : t list -> string
 end
 
 module BackgroundAttachment : sig