branch: externals/phps-mode
commit b4bf3caeb3c5bd9435e155b0fb630d03448347fe
Author: Christian Johansson <[email protected]>
Commit: Christian Johansson <[email protected]>
Added TODO note
---
phps-mode-indent.el | 31 ++++++++++++++++---------------
1 file changed, 16 insertions(+), 15 deletions(-)
diff --git a/phps-mode-indent.el b/phps-mode-indent.el
index 8a6cc8ff27..61ae9aea0b 100644
--- a/phps-mode-indent.el
+++ b/phps-mode-indent.el
@@ -763,6 +763,7 @@
(end-of-line)
(forward-char -1)
+ ;; TODO Need to determine if bracket started on assignment
line or not
(let ((not-found t)
(is-assignment nil)
(is-string-doc)
@@ -789,21 +790,21 @@
(setq
not-found
nil))
- (t
- (when (string= match ")")
- (setq parenthesis-level (1- parenthesis-level)))
- (when (= parenthesis-level 0)
- (setq is-assignment (string= match "="))
- (setq is-bracket-less-command
- (string-match-p
- "\\(echo[\t ]+\\|print[\t ]+\\)"
- match))
- (setq not-found nil))
-
- (when (string= match "(")
- (setq
- parenthesis-level
- (1+ parenthesis-level)))))))
+ ((string= match "(")
+ (setq
+ parenthesis-level
+ (1+ parenthesis-level)))
+ ((string= match ")")
+ (setq
+ parenthesis-level
+ (1- parenthesis-level)))
+ ((= parenthesis-level 0)
+ (setq is-assignment (string= match "="))
+ (setq is-bracket-less-command
+ (string-match-p
+ "\\(echo[\t ]+\\|print[\t ]+\\)"
+ match))
+ (setq not-found nil)))))
;; $var = <<<EOD
;; OKASDOKASD