]> gitweb.factorcode.org Git - factor.git/commitdiff
help.vocabs: continue using convert-prefixes in $vocabs.
authorJohn Benediktsson <mrjbq7@gmail.com>
Sun, 25 Feb 2018 02:11:26 +0000 (18:11 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Sun, 25 Feb 2018 02:11:26 +0000 (18:11 -0800)
basis/help/vocabs/vocabs.factor

index 1f39d06ab852cb4a90f8511252eee182d7a07721..c0546a46456c93120ca159660e56391ddeaf028f 100644 (file)
@@ -26,8 +26,13 @@ IN: help.vocabs
     [ "Children from " prepend ] [ "Children" ] if*
     $heading ;
 
+<PRIVATE
+: convert-prefixes ( seq -- seq' )
+    [ dup vocab-prefix? [ name>> <vocab-link> ] when ] map ;
+PRIVATE>
+
 : $vocabs ( seq -- )
-    [ vocab-row ] map vocab-headings prefix $table ;
+    convert-prefixes [ vocab-row ] map vocab-headings prefix $table ;
 
 : $vocab-roots ( assoc -- )
     [