summaryrefslogtreecommitdiff
path: root/lisp/net/sieve-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/net/sieve-mode.el')
-rw-r--r--lisp/net/sieve-mode.el8
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/net/sieve-mode.el b/lisp/net/sieve-mode.el
index f62af03534a..695a3235a7b 100644
--- a/lisp/net/sieve-mode.el
+++ b/lisp/net/sieve-mode.el
@@ -200,7 +200,13 @@ Turning on Sieve mode runs `sieve-mode-hook'."
(let ((depth (car (syntax-ppss))))
(when (looking-at "[ \t]*}")
(setq depth (1- depth)))
- (indent-line-to (* 2 depth)))))
+ (indent-line-to (* 2 depth))))
+ ;; Skip to the end of the indentation if at the beginning of the
+ ;; line.
+ (when (save-excursion
+ (skip-chars-backward " \t")
+ (bolp))
+ (skip-chars-forward " \t")))
(provide 'sieve-mode)