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

return now goes to the next hit, when keyboard focus is in the search bar

Browse Source 
svn: r10935
This commit is contained in:
Robby Findler 2008-07-27 14:44:12 +00:00
parent f6714c551c
commit d1330f543c
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/framework/private/frame.ss
View File

@ -1895,6 +1895,11 @@
(set-styles-fixed #t))) (set-styles-fixed #t)))
(define search/replace-keymap (new keymap%)) (define search/replace-keymap (new keymap%))
(send search/replace-keymap map-function "return" "find")
(send search/replace-keymap add-function "find"
(λ (text evt)
(send (send text get-top-level-window) search 'forward)))
(send search/replace-keymap map-function "esc" "hide-search") (send search/replace-keymap map-function "esc" "hide-search")
(send search/replace-keymap add-function "hide-search" (send search/replace-keymap add-function "hide-search"
(λ (text evt) (λ (text evt)