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.