readline-listener: change to filter first and then unique

diff --git a/extra/readline-listener/readline-listener.factor b/extra/readline-listener/readline-listener.factor
index a66155451408c85a5bf6077ed515f6aa1cb3b30d..b40b070e8f1f2df07b3298596afacbaa0909305a 100644 (file)
--- a/extra/readline-listener/readline-listener.factor
+++ b/extra/readline-listener/readline-listener.factor
@@ -29,7 +29,7 @@ M: readline-reader prompt.
     swap '[ _ head? ] filter ;
 
 : prefixed-words ( prefix -- words )
-    all-words [ name>> ] map! members prefixed ;
+    all-words [ name>> ] map! prefixed members ;
 
 : prefixed-vocabs ( prefix -- vocabs )
     all-disk-vocabs-recursive filter-vocabs [ name>> ] map! prefixed ;