Fix typo and respond to code review

This prevents the code from crashing and makes it simpler.
ocaml · Feb 28, 2025 · 10bfb61 · 10bfb61
1 parent f5906fa
commit 10bfb61
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/tuareg.el b/tuareg.el
@@ -2210,13 +2210,11 @@ Return values can be
          (and (not (smie-rule-bolp))
               (cond ((smie-rule-prev-p "d=")
                      (smie-rule-parent tuareg-default-indent))
-                    ((or (smie-rule-prev-p "begin") (smi-rule-prev-p "("))
+                    ((smie-rule-prev-p "begin" "(")
                      (smie-rule-parent)))))
         ((equal token "then") (smie-rule-parent))
         ((equal token "if") (if (and (not (smie-rule-bolp))
-                                     (or (smie-rule-prev-p "else")
-                                         (smie-rule-prev-p "(")
-                                         (smie-rule-prev-p "begin")))
+                                     (smie-rule-prev-p "else" "(" "begin"))
                                 (smie-rule-parent)))
         ((and (equal token "with") (smie-rule-parent-p "{"))
          (smie-rule-parent))