[nongnu] elpa/evil 76a104dd87 5/5: Add tests for blockwise visual paste

[ELPA Syncer]

branch: elpa/evil
commit 76a104dd87252f8b1107fe3fc1d3eb5ae45bcc55
Author: Tom Dalziel <tom_dl@hotmail.com>
Commit: Tom Dalziel <33435574+tomdl89@users.noreply.github.com>

    Add tests for blockwise visual paste
---
 evil-tests.el | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/evil-tests.el b/evil-tests.el
index 65fd8f4fd2..ad47b5daae 100644
--- a/evil-tests.el
+++ b/evil-tests.el
@@ -2926,7 +2926,19 @@ word3[]"))
     (evil-test-buffer
      "foo"
      ("viw" "\"=p(* 6 7)" [return])
-     "4[2]")))
+     "4[2]"))
+  (ert-info ("Blockwise visual paste (of charwise text) with count")
+    (evil-test-buffer
+      "[a]bc\n123\n123\n123"
+      ("ye" "jl" "\C-vG" "2p")
+      "abc\n1[a]bcabc3\n1abcabc3\n1abcabc3"
+      ("gv") ;; Test point & mark are stored correctly
+      "abc\n1<abcabc3\n1abcabc3\n1abcab[c]>3"))
+  (ert-info ("Blockwise visual paste of linewise text")
+    (evil-test-buffer
+      "[a]bc\n123\n123\n123"
+      ("yy" "jl" "\C-vG" "p")
+      "abc\n1\nabc\n3\n1\nabc\n3\n1\nabc\n3")))
 
 (ert-deftest evil-test-visual-paste-pop ()
   "Test `evil-paste-pop' after visual paste."