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

[factor.git] / extra / sequences / abbrev / abbrev.factor

diff --git a/extra/sequences/abbrev/abbrev.factor b/extra/sequences/abbrev/abbrev.factor
index 9451768c50035369534a7f65520594724e574fdc..453e78d5d12ce03f69232cc1440da42a964b1aaa 100644 (file)
--- a/extra/sequences/abbrev/abbrev.factor
+++ b/extra/sequences/abbrev/abbrev.factor
@@ -16,4 +16,4 @@ PRIVATE>
     ] keep ;
 
 : unique-abbrev ( seqs -- assoc )
-    abbrev [ nip length 1 = ] assoc-filter ;
+    abbrev [ length 1 = ] filter-values ;