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

fix control-paren-keys keybindings for altgr keys

Browse Source
This commit is contained in:
Robby Findler 2014-11-06 09:18:01 -06:00
parent 7c9b16b59f
commit ec6bb1b8c0
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
pkgs/gui-pkgs/gui-lib/framework/private/racket.rkt
View File

@ -1497,10 +1497,10 @@
(send e insert closer (+ start 1) (+ start 1))) (send e insert closer (+ start 1) (+ start 1)))
(send e end-edit-sequence))) (send e end-edit-sequence)))
(send keymap map-function keystroke name))]) (send keymap map-function keystroke name))])
(add/map-non-clever "non-clever-open-square-bracket" "c:[" #\[ #\]) (add/map-non-clever "non-clever-open-square-bracket" "~g:c:[" #\[ #\])
(add/map-non-clever "non-clever-close-square-bracket" "c:]" #\]) (add/map-non-clever "non-clever-close-square-bracket" "~g:c:]" #\])
(add/map-non-clever "non-clever-close-curley-bracket" "c:}" #\}) (add/map-non-clever "non-clever-close-curley-bracket" "~g:c:}" #\})
(add/map-non-clever "non-clever-close-round-paren" "c:)" #\))) (add/map-non-clever "non-clever-close-round-paren" "~g:c:)" #\)))
(send keymap add-function "balance-parens" (send keymap add-function "balance-parens"
(λ (edit event) (λ (edit event)