; * lisp/net/sieve-mode.el (sieve-indent-offset)

Use the new 'sieve-indent-offset' customizable variable.

Copyright-paperwork-exempt: yes

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 @@
   "Sieve."
   :group 'languages)
 
+(defcustom sieve-indent-offset 2
+  "Indentation offset for Sieve mode."
+  :type 'integer
+  :group 'sieve
+  :safe #'integerp
+  :version "31.1")
+
 (defcustom sieve-mode-hook nil
   "Hook run in sieve mode buffers."
   :type 'hook)
@@ -180,7 +187,7 @@ 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 (* sieve-indent-offset depth))))
   ;; Skip to the end of the indentation if at the beginning of the
   ;; line.
   (when (save-excursion