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

bootstrap fix

cvs
Slava Pestov 2005-12-02 06:02:08 +00:00
parent a3d71ca9aa
commit d3c3b80c07
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
library/help/markup.factor
View File

@ -35,10 +35,18 @@ kernel lists namespaces prettyprint sequences styles ;
($block) ; ($block) ;
! Some links ! Some links
TUPLE: link name ;
M: link article-title link-name article-title ;
M: link article-content link-name article-content ;
DEFER: help
: $subsection ( object -- ) : $subsection ( object -- )
first [ first [
dup <link> presented set dup <link> presented set
dup [ help ] curry outline set dup [ link-name help ] curry outline set
] make-hash [ article-title $subheading ] with-style terpri ; ] make-hash [ article-title $subheading ] with-style terpri ;
: $link ( name -- ) : $link ( name -- )