branch: externals/phps-mode
commit 50d006852c82bed83f7707b8e437d741ff2508a9
Author: Christian Johansson <[email protected]>
Commit: Christian Johansson <[email protected]>
Fixed issue with indent being dependent on position of point on current line
---
phps-mode-indent.el | 2 ++
test/phps-mode-test-indent.el | 7 +++++++
2 files changed, 9 insertions(+)
diff --git a/phps-mode-indent.el b/phps-mode-indent.el
index 5d7cfdc58e..7bf729de48 100644
--- a/phps-mode-indent.el
+++ b/phps-mode-indent.el
@@ -143,6 +143,8 @@
(when initial-point
(goto-char point))
+ (move-beginning-of-line nil)
+ (setq point (point))
;; Current line is line at initial point
(setq
diff --git a/test/phps-mode-test-indent.el b/test/phps-mode-test-indent.el
index 3f0ace71da..de45caa306 100644
--- a/test/phps-mode-test-indent.el
+++ b/test/phps-mode-test-indent.el
@@ -22,6 +22,13 @@
(goto-char (point-min))
(phps-mode-indent-line)
(while (search-forward "\n" nil t nil)
+ ;; Go to random point on line
+ (let ((line-min-position (line-beginning-position))
+ (line-max-position (line-end-position)))
+ (goto-char
+ (+
+ line-min-position
+ (random (- line-max-position line-min-position)))))
(phps-mode-indent-line)))
(defun phps-mode-test-indent--should-equal (string name)
