Back out of fancy with/end different processing

diff --git a/elisp/domtool-mode.el b/elisp/domtool-mode.el
index 4b37e9c..c05fabd 100644 (file)
--- a/elisp/domtool-mode.el
+++ b/elisp/domtool-mode.el
@@ -126,11 +126,9 @@
 
     0))
 
 
     0))
 

-(defun until-closed (is-with)
+(defun until-closed ()

   (save-excursion
   (save-excursion

-    (if is-with
-       (until-closed-helper 1)
-      (until-closed-helper 0))))
+    (until-closed-helper 0)))

 
 (defun domtool-calculate-indent ()
   (save-excursion
 
 (defun domtool-calculate-indent ()
   (save-excursion


@@ -147,10 +145,8 @@
           'noindent)
          ((nth 4 state)
           (domtool-calculate-comment-indent state))
           'noindent)
          ((nth 4 state)
           (domtool-calculate-comment-indent state))

-         ((looking-at "\\_<\\(with\\)\\_>")
-          (until-closed t))
-         ((looking-at "\\_<\\(end\\)\\_>")
-          (until-closed nil))
+         ((looking-at "\\_<\\(with\\|end\\)\\_>")
+          (until-closed))

          ((not previous-keyword)
           base-indent)
          ((string= previous-keyword "end")
          ((not previous-keyword)
           base-indent)
          ((string= previous-keyword "end")