scripts/emacs/auto/-keys.el

34 lines
747 B
EmacsLisp
Raw Normal View History

2020-01-16 01:34:14 -08:00
(defvar agw-mode-map (make-sparse-keymap)
"Global keymap for `agw-mode'.")
(define-minor-mode agw-key-map
"Minor mode for key bindings."
:global t
:keymap agw-mode-map)
(defun agw-set-key (key def)
(define-key agw-mode-map (kbd (concat "C-<tab> " key)) def))
2020-01-21 23:48:27 -08:00
(agw-set-key "b d" #'kill-this-buffer)
(agw-set-key "b e" #'ibuffer)
2020-01-16 01:34:14 -08:00
2020-01-30 11:15:03 -08:00
(agw-set-key "f" #'dired-jump)
2020-01-16 01:34:14 -08:00
2020-01-21 23:48:27 -08:00
(agw-set-key "w" #'deadgrep)
2020-01-16 01:34:14 -08:00
2020-01-21 23:48:27 -08:00
(agw-set-key "h" #'windmove-left)
(agw-set-key "j" #'windmove-down)
(agw-set-key "k" #'windmove-up)
(agw-set-key "l" #'windmove-right)
2020-01-16 01:34:14 -08:00
2020-01-21 23:48:27 -08:00
(agw-set-key "s" #'sort-lines)
2020-01-16 01:34:14 -08:00
(agw-key-map)
2020-01-30 11:14:15 -08:00
(evil-global-set-key 'visual (kbd "g a") #'ialign)
2020-01-16 01:34:14 -08:00
; just in case - bind for disabling key map mode
2020-01-21 23:48:27 -08:00
(global-set-key (kbd "C-x C-<tab>") #'agw-key-map)
2020-01-16 01:34:14 -08:00
;; EOF