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

allow space in search

Browse Source 
svn: r523
This commit is contained in:
Matthew Flatt 2005-08-01 17:45:48 +00:00
parent e8c07c12a6
commit c31a64ee56
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/browser/private/hyper.ss
View File

@ -579,7 +579,7 @@ A test case:
(send hyper-keymap map-function "pageup" "previous-page") (send hyper-keymap map-function "pageup" "previous-page")
(send hyper-keymap map-function "wheeldown" "do-wheel") (send hyper-keymap map-function "wheeldown" "do-wheel")
(send hyper-keymap map-function "pagedown" "next-page") (send hyper-keymap map-function "pagedown" "next-page")
(send hyper-keymap map-function "space" "next-page") ; (send hyper-keymap map-function "space" "next-page")
;; call-with-hyper-panel : object ((is-a?/c hyper-panel<%>) -> void) -> void ;; call-with-hyper-panel : object ((is-a?/c hyper-panel<%>) -> void) -> void
(define (call-with-hyper-panel text f) (define (call-with-hyper-panel text f)