Revert "add $related-subsections"

This reverts commit 7c22e764f9.
factor-shell
John Benediktsson 2018-02-05 07:46:42 -08:00
parent 7c22e764f9
commit a791d297ea
2 changed files with 1 additions and 13 deletions

View File

@ -195,14 +195,7 @@ HELP: $subsections
{ $markup-example { $subsections "sequences" nth each } }
} ;
HELP: $related-subsections
{ $values { "children" "a " { $link sequence } " of one or more " { $link topic } "s" } }
{ $description "A version of " { $link $subsections } " which also calls " { $link related-words } " on " { $snippet "children" } ", relating its contents together." }
{ $examples
{ $markup-example { $related-subsections keep + } }
} ;
{ $subsection $subsections $related-subsections $link $vocab-subsection } related-words
{ $subsection $subsections $link } related-words
HELP: $vocab-subsection
{ $values { "element" "a markup element of the form " { $snippet "{ title vocab }" } } }

View File

@ -251,11 +251,6 @@ PRIVATE>
: $subsections ( children -- )
[ $subsection* ] each ($blank-line) ;
DEFER: related-words
: $related-subsections ( children -- )
[ related-words ] [ $subsections ] bi ;
: $subsection ( element -- )
check-first $subsection* ;