Skip to content

Instantly share code, notes, and snippets.

@andybp85
Created January 11, 2019 14:15
Show Gist options
  • Save andybp85/eb0a2a90305d65cabec3040e7e398ac0 to your computer and use it in GitHub Desktop.
Save andybp85/eb0a2a90305d65cabec3040e7e398ac0 to your computer and use it in GitHub Desktop.
finally got around to setting up drracket comment and uncomment to cmd-; and cmd-shft-;
#lang s-exp framework/keybinding-lang
; taken from drracket docs
(define (rebind key command)
(keybinding
key
(λ (ed evt)
(send (send ed get-keymap) call-function
command ed evt #t))))
; rebind comment and uncomment to d-; and D-;
(rebind "d:semicolon" "comment-out")
(rebind "d:s:semicolon" "uncomment")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment