[nongnu] elpa/iedit 27de77eda5 133/301: add test to ensure padding of EOL happens to make up rectangle

[ELPA Syncer]

branch: elpa/iedit
commit 27de77eda5a251b1ba54fe0e5b8e3efccb2335cb
Author: Le Wang <le.wang@agworld.com.au>
Commit: Le Wang <le.wang@agworld.com.au>

    add test to ensure padding of EOL happens to make up rectangle
---
 iedit-tests.el | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/iedit-tests.el b/iedit-tests.el
index 4ffc303361..d0b3bd7119 100644
--- a/iedit-tests.el
+++ b/iedit-tests.el
@@ -475,6 +475,23 @@ arfoo
  foo"))
  (should (equal killed-rectangle '("foo" " fo" "  b" "   "))))))
 
+(ert-deftest iedit-kill-rectangle-fill-extra-spaces ()
+  "lines within rectangle shorter than rectangle right column
+  should have spaces filled in."
+  (with-iedit-test-fixture
+   "foo
+ foo
+  barfoo
+    foo"
+   (lambda ()
+     (iedit-mode)
+     (setq indent-tabs-mode nil)
+     (set-mark-command nil)
+     (goto-word "barfoo")
+     (call-interactively 'iedit-rectangle-mode)
+     (should (iedit-same-column))
+     (should (equal '(1 27) (marker-position-list iedit-rectangle))))))
+
 (ert-deftest iedit-restrict-defun-test ()
   (with-iedit-test-fixture
 "a