From 36a63d1613c7c8573e08e46d428c57513bcf79d5 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Thu, 11 Feb 2021 20:21:38 -0500 Subject: [PATCH] Fix #4614: evil-mc not propagating visual-beg-of-line ...to all cursors, because it wasn't whitelisted. --- modules/editor/multiple-cursors/config.el | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/modules/editor/multiple-cursors/config.el b/modules/editor/multiple-cursors/config.el index 4afd246db..dbd4b2465 100644 --- a/modules/editor/multiple-cursors/config.el +++ b/modules/editor/multiple-cursors/config.el @@ -75,6 +75,9 @@ (evil-escape . evil-mc-execute-default-evil-normal-state) ; C-g (evil-numbers/inc-at-pt-incremental) (evil-numbers/dec-at-pt-incremental) + (evil-digit-argument-or-evil-beginning-of-line + (:default . evil-mc-execute-default-call) + (visual . evil-mc-execute-visual-call)) ;; :tools eval (+eval:replace-region . +multiple-cursors-execute-default-operator-fn) ;; :lang ess @@ -82,9 +85,11 @@ ;; :lang org (evil-org-delete . evil-mc-execute-default-evil-delete))) (setf (alist-get (car fn) evil-mc-custom-known-commands) - (list (cons :default - (or (cdr fn) - #'evil-mc-execute-default-call-with-count))))) + (if (listp (cdr fn)) + (cdr fn) + (list (cons :default + (or (cdr fn) + #'evil-mc-execute-default-call-with-count)))))) ;; HACK Allow these commands to be repeated by prefixing them with a numerical ;; argument. See gabesoft/evil-mc#110