steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

basis: use <vocab-link> in a couple places.

db4
John Benediktsson 2014-06-03 10:14:03 -07:00
parent 2b4844e753
commit 256b135aa9
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/help/lint/lint.factor
View File

@ -67,7 +67,7 @@ PRIVATE>
] check-something ; ] check-something ;
: check-about ( vocab -- ) : check-about ( vocab -- )
vocab-link boa dup <vocab-link> dup
'[ _ vocab-help [ lookup-article drop ] when* ] check-something ; '[ _ vocab-help [ lookup-article drop ] when* ] check-something ;
: check-vocab ( vocab -- ) : check-vocab ( vocab -- )

2
basis/vocabs/hierarchy/hierarchy.factor
View File

@ -73,7 +73,7 @@ PRIVATE>
: no-prefixes ( seq -- seq' ) [ vocab-prefix? not ] filter ; : no-prefixes ( seq -- seq' ) [ vocab-prefix? not ] filter ;
: convert-prefixes ( seq -- seq' ) : convert-prefixes ( seq -- seq' )
[ dup vocab-prefix? [ name>> vocab-link boa ] when ] map ; [ dup vocab-prefix? [ name>> <vocab-link> ] when ] map ;
: remove-redundant-prefixes ( seq -- seq' ) : remove-redundant-prefixes ( seq -- seq' )
#! Hack. #! Hack.