fix typo; layout

svn: r12138
This commit is contained in:
Eli Barzilay 2008-10-27 13:37:47 +00:00
parent 6be0f8f4df
commit 7d72dc43c4

View File

@ -191,7 +191,7 @@
(define search-field (define search-field
@`p{Search: @(input ([type "text"] [id "search_box"] @`p{Search: @(input ([type "text"] [id "search_box"]
[onchange "delayed_search(this.value,event);"] [onchange "delayed_search(this.value,event);"]
[onkeyup "delayed_search(this.value,event);"])))}) [onkeyup "delayed_search(this.value,event);"]))})
) )
@ -199,8 +199,7 @@
(let ([sa string-append] (let ([sa string-append]
[emptylabel "...search manuals..."] [emptylabel "...search manuals..."]
[dimcolor "#888"]) [dimcolor "#888"])
`(form `(form ([class "searchform"])
([class "searchform"])
(input (input
([class "searchbox"] ([class "searchbox"]
[style ,(sa "color: "dimcolor";")] [style ,(sa "color: "dimcolor";")]