emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/phps-mode 413547fbf1 188/212: Searching for previous br


From: Christian Johansson
Subject: [elpa] externals/phps-mode 413547fbf1 188/212: Searching for previous bracket now steps over optional PHP starting tags
Date: Wed, 26 Jan 2022 01:51:25 -0500 (EST)

branch: externals/phps-mode
commit 413547fbf1ecb86f8b360a253345282e83200fd4
Author: Christian Johansson <christian@cvj.se>
Commit: Christian Johansson <christian@cvj.se>

    Searching for previous bracket now steps over optional PHP starting tags
---
 phps-mode-indent.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/phps-mode-indent.el b/phps-mode-indent.el
index 1210770b49..ff8e0a2d7f 100644
--- a/phps-mode-indent.el
+++ b/phps-mode-indent.el
@@ -259,6 +259,11 @@
       (if from-end-of-line
           (end-of-line)
         (beginning-of-line)
+
+        ;; Step over optional PHP starting tag
+        (when (looking-at-p "^[\t ]*<\\?php[\t ]+")
+          (search-forward-regexp "^[\t ]*<\\?php[\t ]+" nil t))
+
         (if (search-forward-regexp "[^])}\t ]" nil t)
             (forward-char -1)
           (end-of-line)))
@@ -917,7 +922,7 @@
                 (when-let
                     ((reference-line
                       (phps-mode-indent--get-previous-start-of-bracket-line)))
-                  (message "reference-line: %S" reference-line)
+                  ;; (message "reference-line: %S" reference-line)
                   (setq
                    new-indentation
                    (phps-mode-indent--string-indentation



reply via email to

[Prev in Thread] Current Thread [Next in Thread]