From 85db50bc4d86e67bc17b9fd0a0dd7cee10fb0008 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Bj=C3=B6rn=20Bidar?= Date: Fri, 31 Jan 2025 03:24:44 +0200 Subject: [PATCH] Bind sieve-refresh-scriptlist to 'g' in sieve-mode * lisp/net/sieve.el (sieve-manage-mode-map): Bind `sieve-refersh-scriptlist' to 'g' to refresh buffer. (sieve-refresh-scriptlist): Highlight in docstring that the function updates the current sieve buffer. (Bug#75956) * doc/misc/sieve.texi (Managing Sieve): Document new keybinding and the existing `sieve-refresh-scriptlist` function. (cherry picked from commit 6967587daef027b0f4fd917b5181b43e45c7cb56) --- doc/misc/sieve.texi | 6 ++++++ lisp/net/sieve.el | 4 +++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/doc/misc/sieve.texi b/doc/misc/sieve.texi index 5d4b3b369d7..deadc991173 100644 --- a/doc/misc/sieve.texi +++ b/doc/misc/sieve.texi @@ -213,6 +213,12 @@ Bury the Manage Sieve buffer without closing the connection. @findex sieve-help Displays help in the minibuffer. +@item g +@kindex g +@findex sieve-refresh-scriptlist +Refresh list of scripts found on the currently opened server. +Update contents of the current sieve buffer. + @item Q @kindex Q @findex sieve-manage-quit diff --git a/lisp/net/sieve.el b/lisp/net/sieve.el index df053538edf..7f496df403c 100644 --- a/lisp/net/sieve.el +++ b/lisp/net/sieve.el @@ -111,6 +111,7 @@ require \"fileinto\"; ;; various "?" #'sieve-help "h" #'sieve-help + "g" #'sieve-refresh-scriptlist ;; activating "m" #'sieve-activate "u" #'sieve-deactivate @@ -314,7 +315,8 @@ Used to bracket operations which move point in the sieve-buffer." (sieve-manage-authenticate))) (defun sieve-refresh-scriptlist () - "Refresh list of scripts found the currently opened server." + "Refresh list of scripts found on the currently opened server. +Update contents of the current sieve buffer." (interactive) (with-current-buffer sieve-buffer (setq buffer-read-only nil) -- 2.39.5