Emacs: Make evil shift in visual mode prefix compatible

This commit is contained in:
Riyyi
2022-09-04 12:37:57 +02:00
parent 82e5740e22
commit 437dd48e51
+4 -4
View File
@@ -63,16 +63,16 @@ Vim equivalence: <Tab>"
Vim equivalence: <gv" Vim equivalence: <gv"
(interactive) (interactive)
(evil-shift-left (region-beginning) (region-end)) (call-interactively #'evil-shift-left)
(funcall (evil-visual-restore))) (setq deactivate-mark nil))
(defun dot/evil-visual-shift-right () (defun dot/evil-visual-shift-right ()
"Shift visual selection left, retains the selection. "Shift visual selection left, retains the selection.
Vim equivalence: >gv" Vim equivalence: >gv"
(interactive) (interactive)
(evil-shift-right (region-beginning) (region-end)) (call-interactively #'evil-shift-right)
(funcall (evil-visual-restore))) (setq deactivate-mark nil))
(evil-mode)) (evil-mode))
#+END_SRC #+END_SRC