Fix two places that should be "all-disk-vocabs-recursive".

diff --git a/basis/present/present-tests.factor b/basis/present/present-tests.factor
index 8fc494918b4f32c17a52ed4468e29c55e81a2813..6b69277e6ce51210b9b28bab05aecefb204264d9 100644 (file)
--- a/basis/present/present-tests.factor
+++ b/basis/present/present-tests.factor
@@ -6,7 +6,7 @@ vocabs.hierarchy ;
 { "Hi" } [ "Hi" present ] unit-test
 { "+" } [ \ + present ] unit-test
 { "kernel" } [ "kernel" lookup-vocab present ] unit-test
-{ } [ disk-vocabs-recursive filter-vocabs [ present ] map drop ] unit-test
+{ } [ all-disk-vocabs-recursive filter-vocabs [ present ] map drop ] unit-test
 
 { "1+1j" } [ C{ 1 1 } present ] unit-test
 { "1-1j" } [ C{ 1 -1 } present ] unit-test

diff --git a/extra/readline-listener/readline-listener.factor b/extra/readline-listener/readline-listener.factor
index e439a0e3d1ebd8bdb3ab1033a1e67a508036904a..e1c1aec71ab4d8ee8de50eadd17151dfe688f491 100644 (file)
--- a/extra/readline-listener/readline-listener.factor
+++ b/extra/readline-listener/readline-listener.factor
@@ -29,7 +29,7 @@ M: readline-reader prompt.
     all-words [ name>> ] map! prefixed ;
 
 : prefixed-vocabs ( prefix -- vocabs )
-    disk-vocabs-recursive filter-vocabs [ name>> ] map! prefixed ;
+    all-disk-vocabs-recursive filter-vocabs [ name>> ] map! prefixed ;
 
 : prefixed-colors ( prefix -- colors )
     named-colors prefixed ;