mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 09:14:18 +00:00
; * lisp/net/sieve-mode.el (sieve-indent-offset)
Use the new 'sieve-indent-offset' customizable variable. Copyright-paperwork-exempt: yes
This commit is contained in:
parent
ddd9fcb57c
commit
e136425932
1 changed files with 8 additions and 1 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Reference in a new issue