diff options
Diffstat (limited to 'ravi-init-navigation.el')
| -rw-r--r-- | ravi-init-navigation.el | 24 |
1 files changed, 11 insertions, 13 deletions
diff --git a/ravi-init-navigation.el b/ravi-init-navigation.el index ad8f11d..e56ce07 100644 --- a/ravi-init-navigation.el +++ b/ravi-init-navigation.el @@ -30,19 +30,17 @@ (progn (region-bindings-mode-enable) - ;; The macro 'bind-key does not seem to work for region-bindings-mode-map - - (define-key region-bindings-mode-map "f" 'forward-word) - (define-key region-bindings-mode-map "b" 'backward-word) + (bind-key "f" 'forward-word region-bindings-mode-map) + (bind-key "b" 'backward-word region-bindings-mode-map) ;; HJKL cluster to replace arrow keys - (define-key region-bindings-mode-map "h" 'backward-char) - (define-key region-bindings-mode-map "l" 'forward-char) - (define-key region-bindings-mode-map "j" 'previous-line) - (define-key region-bindings-mode-map "k" 'next-line) + (bind-key "h" 'backward-char region-bindings-mode-map) + (bind-key "l" 'forward-char region-bindings-mode-map) + (bind-key "j" 'previous-line region-bindings-mode-map) + (bind-key "k" 'next-line region-bindings-mode-map) ;; Most of the time, we mark regions to copy - (define-key region-bindings-mode-map "w" 'kill-ring-save) + (bind-key "w" 'kill-ring-save region-bindings-mode-map) ) :ensure t ) @@ -72,10 +70,10 @@ (setq mc/list-file (ravi/emacs-file "past/mc-lists.el")) :config (progn - (define-key region-bindings-mode-map "a" 'mc/mark-all-like-this) - (define-key region-bindings-mode-map "p" 'mc/mark-previous-like-this) - (define-key region-bindings-mode-map "n" 'mc/mark-next-like-this) - (define-key region-bindings-mode-map "m" 'mc/mark-more-like-this-extended) + (bind-key "a" 'mc/mark-all-like-this region-bindings-mode-map) + (bind-key "p" 'mc/mark-previous-like-this region-bindings-mode-map) + (bind-key "n" 'mc/mark-next-like-this region-bindings-mode-map) + (bind-key "m" 'mc/mark-more-like-this-extended region-bindings-mode-map) ) :ensure t ) |