From 6f0cf3a6bbfdb359f6c8b1e1c218a626eba7bb5f Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 16 Dec 2007 20:47:20 +0000 Subject: [PATCH] Improve domtool-mode indentation --- elisp/domtool-mode.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/elisp/domtool-mode.el b/elisp/domtool-mode.el index cbd5175..db93b74 100644 --- a/elisp/domtool-mode.el +++ b/elisp/domtool-mode.el @@ -100,7 +100,7 @@ (defun until-closed-helper (level) (if - (re-search-backward "\\_<\\(with\\|where\\|begin\\|end\\|let\\)\\_>" + (re-search-backward "\\_<\\(with\\|where\\|begin\\|end\\|let\\|val\\|type\\|if\\)\\_>" nil t) (cond ((string= (match-string 0) "end") @@ -121,7 +121,7 @@ (back-to-indentation) (multiple-value-bind (previous-keyword base-indent) (save-excursion - (if (re-search-backward "\\_<\\(with\\|where\\|begin\\|end\\|let\\|in\\)\\_>" + (if (re-search-backward "\\_<\\(with\\|where\\|begin\\|end\\|let\\|in\\|val\\|type\\|if\\)\\_>" nil t) (values (match-string 0) (current-indentation)) (values nil 0))) @@ -131,7 +131,7 @@ 'noindent) ((nth 4 state) (domtool-calculate-comment-indent state)) - ((looking-at "\\_<\\(with\\|end\\|in\\)\\_>") + ((looking-at "\\_<\\(with\\|end\\|in\\|else\\)\\_>") (until-closed)) ((not previous-keyword) base-indent) -- 2.20.1