fix shiz

extra/spider/spider-docs.factor

@@ -1,7 +1,7 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: help.markup help.syntax io.streams.string urls
-multiline ;
+multiline spider.private quotations ;
 IN: spider
 
 HELP: <spider>
@@ -16,12 +16,6 @@ HELP: run-spider
      { "spider" spider } }
 { $description "Runs a spider until completion. See the " { $subsection "spider-tutorial" } " for a complete description of the tuple slots that affect how thet spider works." } ;
 
-HELP: spider
-{ $description "" } ;
-
-HELP: spider-result
-{ $description "" } ;
-
 HELP: slurp-heap-when
 { $values
      { "heap" "a heap" } { "quot1" quotation } { "quot2" quotation } }

extra/spider/spider.factor

@@ -65,7 +65,7 @@ links processing-time timestamp ;
     f pick spider get spidered>> set-at
     over '[ _ http-get ] benchmark swap
     [ parse-html dup find-hrefs normalize-hrefs ] benchmark
-    now spider-result boa
+    now spider-result boa ;
 
 : spider-page ( url depth -- )
     spider get quiet>> [ 2dup print-spidering ] unless