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

shorter timeout

Browse Source 
svn: r10008
This commit is contained in:
Eli Barzilay 2008-05-28 19:46:31 +00:00
parent 347b8bee28
commit 2b81374b0b
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/scribblings/main/private/make-search.ss
View File

@ -50,11 +50,11 @@
;; (list (exported-index-desc-name desc)
;; (exported-index-desc-from-libs desc)))
;; Note: using ~s to have javascript-quoted strings
(format "~a[~s, ~s, ~s]"
(if (eq? i (car l)) "" ",\n")
(format "[~s, ~s, ~s]"
(string-downcase (string-join texts " "))
href
html)))
(set! l (add-between l ",\n"))
@script[#:noscript @list{Sorry, you must have JavaScript to use this page.}]{
// this vector has an entry for each index link: [text, url, html]
plt_search_data = [
@ -216,7 +216,7 @@
if (key == 13) DoSearch();
else if (key == 33) PageUp();
else if (key == 34) PageDn();
else search_timer = setTimeout(DoSearch, 1000);
else search_timer = setTimeout(DoSearch, 400);
}
search_handler = DelayedSearch;