hiro/boon
1
0
Fork 0
mirror of https://github.com/vale981/boon synced 2025-03-04 17:11:40 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

extra keys

Browse source
This commit is contained in:
Jean-Philippe Bernardy 2015-12-11 20:38:53 +01:00
parent 78f245b52d
commit e426adbb5a
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
boon-keys.el
View file

@ -23,6 +23,8 @@
(define-key boon-command-map [(backspace)] 'undefined)
(define-key boon-command-map "`" 'boon-toggle-case)
(define-key boon-command-map "!" 'shell-command)
(define-key boon-command-map "|" 'shell-command-on-region)
(define-key boon-command-map "_" 'redo)
(define-key boon-command-map "-" 'undo)
(define-key boon-command-map "=" 'universal-argument)
@ -35,6 +37,7 @@
(append (kbd kbd-string) unread-command-events)))
(define-key boon-c-map "!" (lambda () (interactive) (boon-push-events "C-c !")))
(define-key boon-c-map "'" (lambda () (interactive) (boon-push-events "C-c '")))
(define-key boon-c-map " " (lambda () (interactive) (boon-push-events "C-c C-SPC")))
(define-key boon-c-map "," (lambda () (interactive) (boon-push-events "C-c C-,")))
(define-key boon-c-map "." (lambda () (interactive) (boon-push-events "C-c C-.")))