Fix help search again

diff --git a/basis/help/html/html.factor b/basis/help/html/html.factor
index 82e83e60e0f57a2dc2cab5b1b701621c9452b673..6b90ba6937acb2294944ebd99123e05699346db1 100644 (file)
--- a/basis/help/html/html.factor
+++ b/basis/help/html/html.factor
@@ -115,10 +115,10 @@ M: result link-href href>> ;
     [ [ title>> ] compare ] sort ;
 
 : article-apropos ( string -- results )
-    "docs/articles.idx" temp-file offline-apropos ;
+    "articles.idx" offline-apropos ;
 
 : word-apropos ( string -- results )
-    "docs/words.idx" temp-file offline-apropos ;
+    "words.idx" offline-apropos ;
 
 : vocab-apropos ( string -- results )
-    "docs/vocabs.idx" temp-file offline-apropos ;
+    "vocabs.idx" offline-apropos ;

diff --git a/extra/webapps/help/help.factor b/extra/webapps/help/help.factor
index c209fe222e6eb0fb13e30927828463894000adfd..3072f5d02448474ed835715d378aae76beeebf66 100644 (file)
--- a/extra/webapps/help/help.factor
+++ b/extra/webapps/help/help.factor
@@ -18,9 +18,11 @@ TUPLE: help-webapp < dispatcher ;
 
             help-dir set-current-directory
 
-            "search" value article-apropos "articles" set-value
-            "search" value word-apropos "words" set-value
-            "search" value vocab-apropos "vocabs" set-value
+            help-dir [
+                "search" value article-apropos "articles" set-value
+                "search" value word-apropos "words" set-value
+                "search" value vocab-apropos "vocabs" set-value
+            ] with-directory
 
             { help-webapp "search" } <chloe-content>
         ] >>submit ;