Rename vocab to lookup-vocab

[factor.git] / basis / see / see.factor

diff --git a/basis/see/see.factor b/basis/see/see.factor
index df6eac1cca0bcf6f92195f509b05513e5a34ecf5..0c02df37973b72cbc821dba6200286f1bc191e50 100644 (file)
--- a/basis/see/see.factor
+++ b/basis/see/see.factor
@@ -47,7 +47,7 @@ M: word print-stack-effect? drop t ;
 <PRIVATE
 
 : seeing-word ( word -- )
-    vocabulary>> dup [ vocab ] when pprinter-in set ;
+    vocabulary>> dup [ lookup-vocab ] when pprinter-in set ;
 
 : word-synopsis ( word -- )
     {