suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

search-context has the proper suffix now

Browse Source 
svn: r10953
This commit is contained in:
Eli Barzilay 2008-07-29 04:32:58 +00:00
parent f6912b7439
commit f30efeb8c3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/help/search.ss
View File

@ -23,7 +23,7 @@
;; search page is refreshed it won't reset the context). ;; search page is refreshed it won't reset the context).
(let* ([label (and (list? context) (= 2 (length context)) (cadr context))] (let* ([label (and (list? context) (= 2 (length context)) (cadr context))]
[context (if (pair? context) (car context) 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 (format "q=~a" (uri-encode str))]
[query (if context [query (if context
(format "~a&hq=~a~a" (format "~a&hq=~a~a"