added alt-/option-/meta- and cmd- arrow bindings

svn: r417
This commit is contained in:
Matthew Flatt 2005-07-21 15:35:01 +00:00
parent d8252393b1
commit 7c44f1efca

View File

@ -614,6 +614,12 @@
(send list-keymap map-function "end" "select-last")
(send list-keymap map-function "pageup" "page-up")
(send list-keymap map-function "pagedown" "page-down")
(send list-keymap map-function "a:up" "page-up")
(send list-keymap map-function "a:down" "page-down")
(send list-keymap map-function "m:up" "page-up")
(send list-keymap map-function "m:down" "page-down")
(send list-keymap map-function "d:up" "select-first")
(send list-keymap map-function "d:down" "select-last")
(send list-keymap add-function "toggle-open/closed"
(lambda (list event) (send list toggle-open/closed)))