14 lines
400 B
Factor
14 lines
400 B
Factor
! Copyright (C) 2006 Slava Pestov.
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
IN: help-responder
|
|
USING: cont-responder hashtables help html kernel namespaces
|
|
sequences ;
|
|
|
|
: help-responder ( filename -- )
|
|
[
|
|
"topic" "query" get hash
|
|
dup empty? [ drop "handbook" ] when
|
|
dup article-title
|
|
[ [ (help) ] with-html-stream ] html-document
|
|
] show-final ;
|