 
 :: <search-action> ( help-dir -- action )
     <page-action>
-        { help-webapp "search" } >>template
         [
             "search" param [ unicode:blank? ] trim [
                 help-dir [

! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs furnace.actions furnace.redirection
help.html help.topics html.components html.forms http.server
http.server.dispatchers http.server.static io.directories
io.files.temp io.servers kernel locals namespaces sequences
unicode urls ;
IN: webapps.help

TUPLE: help-webapp < dispatcher ;

            help-navbar "navbar" set-value

            { help-webapp "search" } <chloe-content>
        ] >>display
    <boilerplatee>
        { help-webapp "search" } >>template ;

: help-url ( topic -- url )
    topic>filename "$help-webapp/content/" prepend >url ;
