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

[factor.git] / basis / regexp / dfa / dfa.factor

diff --git a/basis/regexp/dfa/dfa.factor b/basis/regexp/dfa/dfa.factor
index 76ee58b043e509c8c5899cf94cf851d4d3352a5d..4cc29b55f7002e66a4c9b1df363a3fc0d0df3d4c 100644 (file)
--- a/basis/regexp/dfa/dfa.factor
+++ b/basis/regexp/dfa/dfa.factor
@@ -13,7 +13,7 @@ IN: regexp.dfa
     new-question old-value = [
         new-question state table set-at
         state nfa transitions>> at
-        [ drop tagged-epsilon? ] assoc-filter
+        [ tagged-epsilon? ] filter-keys
         [| trans to |
             to [
                 table nfa