branch: externals/phps-mode
commit d4164436250d9155935b8551f1bf8927e9a420ad
Author: Christian Johansson <christ...@cvj.se>
Commit: Christian Johansson <christ...@cvj.se>
Added more test for moving line-indent index
---
phps-mode-test-functions.el | 12 ++++++++++++
1 file changed, 12 insertions(+)
diff --git a/phps-mode-test-functions.el b/phps-mode-test-functions.el
index ec9c7a6..5395c19 100644
--- a/phps-mode-test-functions.el
+++ b/phps-mode-test-functions.el
@@ -44,12 +44,24 @@
(phps-mode-test-with-buffer
"<?php\n/**\n * Bla\n */"
+ "Move line-indents zero lines down"
+ (should (equal '((1 (0 0)) (2 (0 0)) (3 (0 1)) (4 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-lines-indent))))
+ (should (equal '((1 (0 0)) (2 (0 0)) (3 (0 1)) (4 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-moved-lines-indent
(phps-mode-functions-get-lines-indent) 2 0)))))
+
+ (phps-mode-test-with-buffer
+ "<?php\n/**\n * Bla\n */"
"Move line-indents one line down"
(should (equal '((1 (0 0)) (2 (0 0)) (3 (0 1)) (4 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-lines-indent))))
(should (equal '((1 (0 0)) (2 (0 0)) (3 (0 0)) (4 (0 1)) (5 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-moved-lines-indent
(phps-mode-functions-get-lines-indent) 2 1)))))
(phps-mode-test-with-buffer
"<?php\n/**\n * Bla\n */"
+ "Move line-indents two lines down"
+ (should (equal '((1 (0 0)) (2 (0 0)) (3 (0 1)) (4 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-lines-indent))))
+ (should (equal '((1 (0 0)) (2 (0 0)) (3 (0 0)) (4 (0 0)) (5 (0 1)) (6 (0
1))) (phps-mode-test-hash-to-list (phps-mode-functions-get-moved-lines-indent
(phps-mode-functions-get-lines-indent) 2 2)))))
+
+ (phps-mode-test-with-buffer
+ "<?php\n/**\n * Bla\n */"
"Move line-indents one line up"
(should (equal '((1 (0 0)) (2 (0 0)) (3 (0 1)) (4 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-lines-indent))))
(should (equal '((1 (0 0)) (2 (0 0)) (3 (0 1)))
(phps-mode-test-hash-to-list (phps-mode-functions-get-moved-lines-indent
(phps-mode-functions-get-lines-indent) 3 -1)))))
