branch: externals/a68-mode
commit b33d03a5cddbe6e497fa079a23dc28ddb515c6fa
Author: Jose E. Marchesi <jose.march...@oracle.com>
Commit: Jose E. Marchesi <jose.march...@oracle.com>

    Fix indentation :before "if"
---
 a68-mode.el | 12 ++----------
 1 file changed, 2 insertions(+), 10 deletions(-)

diff --git a/a68-mode.el b/a68-mode.el
index e4b91a9f93..0a889ff437 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -1137,11 +1137,7 @@ UPPER stropping version."
        (smie-rule-parent)))
     (`(:before . "(")
      (when (smie-rule-hanging-p)
-       (smie-rule-parent)))
-    (`(:before . "IF")
-     (and (not (smie-rule-bolp))
-          (smie-rule-prev-p "ELSE")
-          (smie-rule-parent)))))
+       (smie-rule-parent)))))
 
 (defun a68--smie-rules-supper (kind token)
   (pcase (cons kind token)
@@ -1184,11 +1180,7 @@ UPPER stropping version."
        (smie-rule-parent)))
     (`(:before . "(")
      (when (smie-rule-hanging-p)
-       (smie-rule-parent)))
-    (`(:before . "if")
-     (and (not (smie-rule-bolp))
-          (smie-rule-prev-p "else")
-          (smie-rule-parent)))))
+       (smie-rule-parent)))))
 
 ;;;; Stropping utilities and commands.
 

Reply via email to