[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ef6f16da2f: Fix point movement when indenting in sieve-mode
From: |
Lars Ingebrigtsen |
Subject: |
master ef6f16da2f: Fix point movement when indenting in sieve-mode |
Date: |
Sun, 2 Oct 2022 08:07:12 -0400 (EDT) |
branch: master
commit ef6f16da2f36278706ae787131062dee088f76ee
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix point movement when indenting in sieve-mode
* lisp/net/sieve-mode.el (sieve-mode-indent-function): Fix point
movement when point is at the start of the line (bug#58202).
---
lisp/net/sieve-mode.el | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/lisp/net/sieve-mode.el b/lisp/net/sieve-mode.el
index f62af03534..695a3235a7 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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master ef6f16da2f: Fix point movement when indenting in sieve-mode,
Lars Ingebrigtsen <=