]> gitweb.factorcode.org Git - factor.git/commitdiff
Help lint fixes
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Fri, 14 Nov 2008 13:22:19 +0000 (07:22 -0600)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Fri, 14 Nov 2008 13:22:19 +0000 (07:22 -0600)
basis/furnace/alloy/alloy-docs.factor
basis/furnace/redirection/redirection-docs.factor

index d07d534510d686e531c3a6be00e7a95bf1363ce7..f108428c901b09817d4e428c2120800365813be4 100644 (file)
@@ -5,7 +5,7 @@ HELP: init-furnace-tables
 { $description "Initializes database tables used by asides, conversations and session management. This word must be invoked inside a " { $link with-db } " scope." } ;
 
 HELP: <alloy>
-{ $values { "responder" "a responder" } { "db" db } { "alloy" "an alloy responder" } }
+{ $values { "responder" "a responder" } { "db" db } { "responder'" "an alloy responder" } }
 { $description "Wraps the responder with support for asides, conversations, sessions and database persistence." }
 { $examples
     "The " { $vocab-link "webapps.counter" } " vocabulary uses an alloy to configure the counter:"
index 42fd3a1f2a01ff87a4dedb2c3f80eb4d9d629e75..fd3671fa1c8ede95f2cd8be8a9750f2f98eeafa0 100644 (file)
@@ -11,6 +11,7 @@ HELP: <redirect>
 { $description "Creates a response which redirects the client to the given URL." } ;
 
 HELP: <secure-only> ( responder -- responder' )
+{ $values { "responder" "a responder" } { "responder'" "a responder" } }
 { $description "Creates a new responder which ensures that the client is connecting via HTTPS before delegating to the underlying responder. If the client is connecting via HTTP, a redirect is sent instead." } ;
 
 HELP: <secure-redirect>