--- gforth/search.fs	1997/07/06 15:55:25	1.2
+++ gforth/search.fs	1998/05/02 21:28:43	1.4
@@ -105,7 +105,7 @@ slowvoc off
 Vocabulary Forth
 Vocabulary Root
 
-: Only  0 vp! also Root also definitions ;
+: Only  1 vp! Root also ;
 
 \ set initial search order                             14may93py
 
@@ -130,7 +130,7 @@ lookup ! \ our dictionary search order b
 : seal ( -- )  context @ 1 set-order ;
 
 : .voc
-    body> >head head>string type space ;
+    body> >head name>string type space ;
 
 : order ( -- )  \  search-ext
     \g prints the search order and the @code{current} wordlist.  The