bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE
commit cb550a460a9f906d315fce7a362443b0403ab099
parent 03ac8b12bd7872027eba8c6cc8f902b9d4c281ff
Author: Eli Barzilay <eli@racket-lang.org>
Date:   Tue, 29 Jul 2008 04:32:58 +0000

search-context has the proper suffix now

svn: r10953

original commit: f30efeb8c3f28caf5a7e2b1d44c47dc667bc49de

Diffstat:

Mcollects/help/search.ss | 2+-


1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/help/search.ss b/collects/help/search.ss
@@ -23,7 +23,7 @@
   ;; search page is refreshed it won't reset the context).
   (let* ([label   (and (list? context) (= 2 (length context)) (cadr context))]
          [context (if (pair? context) (car context) context)]
-         [page    (if context "search-context.htm" "index.html")]
+         [page    (if context "search-context.html" "index.html")]
          [query   (format "q=~a" (uri-encode str))]
          [query   (if context
                     (format "~a&hq=~a~a"