fix for append from visual state

emacs-evil · Sep 14, 2018 · 6fde982 · 6fde982
1 parent c1189d3
commit 6fde982
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 0 deletions.
diff --git a/evil-commands.el b/evil-commands.el
@@ -2301,6 +2301,7 @@ the lines."
           (evil-insert count vcount skip-empty-lines)))
        (t
         (evil-visual-rotate 'lower-right)
+        (backward-char)
         (evil-append count)))
     (unless (eolp) (forward-char))
     (evil-insert count vcount skip-empty-lines)

diff --git a/evil-tests.el b/evil-tests.el
@@ -596,6 +596,14 @@ Below some empty line"
     ("aevil rulz " [escape])
     ";; Tevil rulz[ ]his buffer is for notes you don't want to save"))
 
+(ert-deftest evil-test-visual-append ()
+  "Test `evil-append' from visual state"
+  :tags '(evil insert)
+  (evil-test-buffer
+   ";; [T]his buffer is for notes you don't want to save"
+   ("veA_evil rulz " [escape])
+   ";; This_evil rulz[ ] buffer is for notes you don't want to save"))
+
 (ert-deftest evil-test-open-above ()
   "Test `evil-open-above'"
   :tags '(evil insert)