diff --git a/basis/help/lint/lint.factor b/basis/help/lint/lint.factor
index 61d9827a48..98257a083e 100755
--- a/basis/help/lint/lint.factor
+++ b/basis/help/lint/lint.factor
@@ -117,7 +117,7 @@ M: help-error error.
     ] keep ;
 
 : check-about ( vocab -- )
-    [ vocab-help [ article drop ] when* ] check-something ;
+    [ help>> [ article drop ] when* ] check-something ;
 
 : check-vocab ( vocab -- seq )
     "Checking " write dup write "..." print
@@ -130,7 +130,7 @@ M: help-error error.
 
 : run-help-lint ( prefix -- alist )
     [
-        all-vocabs-seq [ vocab-name ] map "all-vocabs" set
+        all-vocabs-seq [ name>> ] map "all-vocabs" set
         articles get keys "group-articles" set
         child-vocabs
         [ dup check-vocab ] { } map>assoc