assocs.extras: Move some often-used words to core

[factor.git] / basis / html / templates / chloe / components / components.factor

diff --git a/basis/html/templates/chloe/components/components.factor b/basis/html/templates/chloe/components/components.factor
index 862f9f4b77e618baf269f47476a84e8a61da5e29..e8ca44b821e911bde803f95c9383a593ddd5e9a4 100644 (file)
--- a/basis/html/templates/chloe/components/components.factor
+++ b/basis/html/templates/chloe/components/components.factor
@@ -20,7 +20,7 @@ M: singleton-class component-tag
     bi* ;
 
 : compile-component-attrs ( tag class -- )
-    [ attrs>> [ drop main>> "name" = ] assoc-reject ] dip
+    [ attrs>> [ main>> "name" = ] reject-keys ] dip
     [ all-slots swap '[ name>> _ at compile-attr ] each ]
     [ [ boa ] [code-with] ]
     bi ;