oreodave/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

+support for multiple functions in evil-mc

Browse Source
This commit is contained in:
Aryadev Chavali
2020-08-10 12:32:27 +01:00
parent 83122c1c12
commit a574444705
1 changed files with 15 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
Emacs/.config/emacs/config.org
View File

@@ -251,10 +251,24 @@ the current position.
("r" . evil-mc-resume-cursors) ("r" . evil-mc-resume-cursors)
("s" . evil-mc-pause-cursors)) ("s" . evil-mc-pause-cursors))
:init :init
(defvar evil-mc-key-map (make-sparse-keymap))
(define-prefix-command 'dx:evil-mc-map) (define-prefix-command 'dx:evil-mc-map)
(bind-key "gz" dx:evil-mc-map evil-normal-state-map) (bind-key "gz" dx:evil-mc-map evil-normal-state-map)
:config :config
(dolist (fn '((delete-char)
(backward-kill-word)
(company-complete-common . evil-mc-execute-default-complete)
(evil-delete-back-to-indentation . evil-mc-execute-default-call)
;; Have evil-mc work with explicit `evil-escape' (on C-g)
(evil-escape . evil-mc-execute-default-evil-normal-state)
;; Add `evil-org' support
(evil-org-delete . evil-mc-execute-default-evil-delete)
(evil-org-delete-char . evil-mc-execute-default-evil-delete)
(evil-org-delete-backward-char . evil-mc-execute-default-evil-delete)))
(cl-pushnew `(,(car fn) (:default . ,(or (cdr fn) #'evil-mc-execute-default-call-with-count)))
evil-mc-custom-known-commands
:test #'eq
:key #'car))
(global-evil-mc-mode +1) (global-evil-mc-mode +1)
(defun dx:evil-mc-cursor-here () (defun dx:evil-mc-cursor-here ()
(interactive) (interactive)