branch: elpa/evil-numbers commit 1f78ca1ec9cad7ceb3fe83c73de0d0d0a4a9dac8 Author: Campbell Barton <ideasma...@gmail.com> Commit: Campbell Barton <ideasma...@gmail.com>
Cleanup: disable auto-wrapping for blocks for readability --- tests/evil-numbers-tests.el | 70 ++++++++++++++++++++++++++++++++++++++------- 1 file changed, 60 insertions(+), 10 deletions(-) diff --git a/tests/evil-numbers-tests.el b/tests/evil-numbers-tests.el index 2a20e0be60..6885ac066b 100644 --- a/tests/evil-numbers-tests.el +++ b/tests/evil-numbers-tests.el @@ -258,8 +258,18 @@ Setting the buffers text to INITIAL-BUFFER-TEXT." (ert-deftest selected-block-column-first () "Block selection test." - (let ((text-expected (concat "1| 0 0\n" "1 0 0\n" "1 0 0\n")) - (text-initial (concat "0 0 0\n" "0 0 0\n" "0 0 0\n"))) + (let ((text-expected + ;; format-next-line: off + (concat + "1| 0 0\n" + "1 0 0\n" + "1 0 0\n")) + (text-initial + ;; format-next-line: off + (concat + "0 0 0\n" + "0 0 0\n" + "0 0 0\n"))) (with-evil-numbers-test text-initial (simulate-input ;; Block select the column @@ -273,8 +283,18 @@ Setting the buffers text to INITIAL-BUFFER-TEXT." (ert-deftest selected-block-column-second () "Block selection test." - (let ((text-expected (concat "0 1| 0\n" "0 1 0\n" "0 1 0\n")) - (text-initial (concat "0 0 0\n" "0 0 0\n" "0 0 0\n"))) + (let ((text-expected + ;; format-next-line: off + (concat + "0 1| 0\n" + "0 1 0\n" + "0 1 0\n")) + (text-initial + ;; format-next-line: off + (concat + "0 0 0\n" + "0 0 0\n" + "0 0 0\n"))) (with-evil-numbers-test text-initial (simulate-input (kbd "w") @@ -289,8 +309,18 @@ Setting the buffers text to INITIAL-BUFFER-TEXT." (ert-deftest selected-block-column-third () "Block selection test." - (let ((text-expected (concat "0 0 1|\n" "0 0 1\n" "0 0 1\n")) - (text-initial (concat "0 0 0\n" "0 0 0\n" "0 0 0\n"))) + (let ((text-expected + ;; format-next-line: off + (concat + "0 0 1|\n" + "0 0 1\n" + "0 0 1\n")) + (text-initial + ;; format-next-line: off + (concat + "0 0 0\n" + "0 0 0\n" + "0 0 0\n"))) (with-evil-numbers-test text-initial (simulate-input (kbd "ww") @@ -305,8 +335,18 @@ Setting the buffers text to INITIAL-BUFFER-TEXT." (ert-deftest selected-block-column-first-incremental () "Incremental block selection test." - (let ((text-expected (concat "1| 0 0\n" "2 0 0\n" "3 0 0\n")) - (text-initial (concat "0 0 0\n" "0 0 0\n" "0 0 0\n"))) + (let ((text-expected + ;; format-next-line: off + (concat + "1| 0 0\n" + "2 0 0\n" + "3 0 0\n")) + (text-initial + ;; format-next-line: off + (concat + "0 0 0\n" + "0 0 0\n" + "0 0 0\n"))) (with-evil-numbers-test text-initial (simulate-input ;; Block select the column @@ -319,8 +359,18 @@ Setting the buffers text to INITIAL-BUFFER-TEXT." (ert-deftest selected-lines-incremental () "Incremental line selection test." - (let ((text-expected (concat "1| 2 3\n" "4 5 6\n" "7 8 9\n")) - (text-initial (concat "0 0 0\n" "0 0 0\n" "0 0 0\n"))) + (let ((text-expected + ;; format-next-line: off + (concat + "1| 2 3\n" + "4 5 6\n" + "7 8 9\n")) + (text-initial + ;; format-next-line: off + (concat + "0 0 0\n" + "0 0 0\n" + "0 0 0\n"))) (with-evil-numbers-test text-initial (simulate-input ;; Block select the column