aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/net/sieve-mode.el9
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/net/sieve-mode.el b/lisp/net/sieve-mode.el
index 1f2ac56d418..54bccc179aa 100644
--- a/lisp/net/sieve-mode.el
+++ b/lisp/net/sieve-mode.el
@@ -48,6 +48,13 @@
48 "Sieve." 48 "Sieve."
49 :group 'languages) 49 :group 'languages)
50 50
51(defcustom sieve-indent-offset 2
52 "Indentation offset for Sieve mode."
53 :type 'integer
54 :group 'sieve
55 :safe #'integerp
56 :version "31.1")
57
51(defcustom sieve-mode-hook nil 58(defcustom sieve-mode-hook nil
52 "Hook run in sieve mode buffers." 59 "Hook run in sieve mode buffers."
53 :type 'hook) 60 :type 'hook)
@@ -180,7 +187,7 @@ Turning on Sieve mode runs `sieve-mode-hook'."
180 (let ((depth (car (syntax-ppss)))) 187 (let ((depth (car (syntax-ppss))))
181 (when (looking-at "[ \t]*}") 188 (when (looking-at "[ \t]*}")
182 (setq depth (1- depth))) 189 (setq depth (1- depth)))
183 (indent-line-to (* 2 depth)))) 190 (indent-line-to (* sieve-indent-offset depth))))
184 ;; Skip to the end of the indentation if at the beginning of the 191 ;; Skip to the end of the indentation if at the beginning of the
185 ;; line. 192 ;; line.
186 (when (save-excursion 193 (when (save-excursion