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

add c:s:pageup/down keybindings to move tabs around in a frame

Browse Source
This commit is contained in:
Robby Findler 2013-10-25 13:02:51 -05:00
parent 067498ddf4
commit 5ff3caf481
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/drracket-pkgs/drracket/drracket/private/rep.rkt
View File

@ -192,6 +192,8 @@ TODO
(add-drs-function "run" (λ (frame) (send frame execute-callback)))
(add-drs-function "next-tab" (λ (frame) (send frame next-tab)))
(add-drs-function "prev-tab" (λ (frame) (send frame prev-tab)))
(add-drs-function "move-current-tab-left" (λ (frame) (send frame move-current-tab-left)))
(add-drs-function "move-current-tab-right" (λ (frame) (send frame move-current-tab-right)))
(add-drs-function "collapse" (λ (frame) (send frame collapse)))
(add-drs-function "split" (λ (frame) (send frame split)))
@ -218,6 +220,8 @@ TODO
(send drs-bindings-keymap map-function "c:s:tab" "prev-tab")
(send drs-bindings-keymap map-function "c:pagedown" "next-tab")
(send drs-bindings-keymap map-function "c:pageup" "prev-tab")
(send drs-bindings-keymap map-function "c:s:pagedown" "move-current-tab-right")
(send drs-bindings-keymap map-function "c:s:pageup" "move-current-tab-left")
(send drs-bindings-keymap map-function "c:x;0" "collapse")
(send drs-bindings-keymap map-function "c:x;2" "split")