[elpa] externals/phps-mode 3565c7efb3 125/212: Fixed byte-compilation warnings for indent file

[Christian Johansson]

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

    Fixed byte-compilation warnings for indent file
---
 phps-mode-indent.el | 32 ++------------------------------
 1 file changed, 2 insertions(+), 30 deletions(-)

diff --git a/phps-mode-indent.el b/phps-mode-indent.el
index acb1b01fe4..7b1d452cd7 100644
--- a/phps-mode-indent.el
+++ b/phps-mode-indent.el
@@ -136,9 +136,7 @@
       (save-excursion
         (let ((move-length 0)
               (move-length1 0)
-              (move-length2 0)
               (current-line-string "")
-              (current-line-is-empty-p)
               (previous-line-string "")
               (previous-line-is-empty-p)
               (previous2-line-string ""))
@@ -181,9 +179,6 @@
                      previous-line-string
                      line-string))
                    ((= searching-previous-lines 1)
-                    (setq
-                     move-length2
-                     (1+ move-length))
                     (setq
                      previous2-line-string
                      line-string)))
@@ -199,14 +194,6 @@
                  (1+ move-length)))))
           (goto-char point)
 
-          (when
-              (string-match-p
-               "^[ \t\f\r\n]*$"
-               current-line-string)
-          (setq
-           current-line-is-empty-p
-           t))
-
           (if previous-line-is-empty-p
               (indent-line-to
                (phps-mode-indent--string-indentation
@@ -226,9 +213,6 @@
                    (previous-line-starts-with-closing-bracket
                     (phps-mode-indent--string-starts-with-closing-bracket
                      previous-line-string))
-                   (previous-line-ends-with-closing-bracket
-                    (phps-mode-indent--string-ends-with-closing-bracket
-                     previous-line-string))
                    (previous-line-starts-with-opening-doc-comment
                     (phps-mode-indent--string-starts-with-opening-doc-comment
                      previous-line-string))
@@ -768,13 +752,10 @@
 
                       (let ((not-found t)
                             (is-assignment nil)
-                            (is-string-doc)
                             (parenthesis-level 0)
-                            (is-bracket-less-command nil)
                             (is-same-line-p t)
                             (is-object-chaining)
-                            (is-object-chaining-on-same-line)
-                            (bracket-opened-on-first-line))
+                            (is-object-chaining-on-same-line))
                         (while
                             (and
                              not-found
@@ -789,9 +770,6 @@
                              ((string-match-p
                                "<<<'?\"?[a-zA-Z0-9]+'?\"?"
                                match)
-                              (setq
-                               is-string-doc
-                               t)
                               (setq
                                not-found
                                nil))
@@ -813,10 +791,6 @@
                                  is-same-line-p)))
                              ((= 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 (or
@@ -1021,10 +995,8 @@
                       (started-chaining-on-this-line t)
                       (is-assignment)
                       (is-string-concatenation)
-                      (parenthesis-level 0)
                       (is-bracket-less-command)
-                      (is-same-line-p t)
-                      (bracket-opened-on-first-line))
+                      (is-same-line-p t))
                   (while
                       (and
                        not-found