From a4f59c0fb9e684f06ab82236474fbf4586968dad Mon Sep 17 00:00:00 2001 From: Julien Danjou Date: Fri, 24 May 2013 14:36:12 +0000 Subject: [PATCH] lisp/gnus/sieve.el (sieve-setup-buffer): Fix default port value in sieve buffer setup --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/sieve.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index f0b23832c64..d475a259113 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2013-05-24 Julien Danjou + + * sieve.el (sieve-setup-buffer): Fix default port value in sieve buffer + setup. + 2013-05-23 Glenn Morris * gnus-util.el (rmail-swap-buffers-maybe) diff --git a/lisp/gnus/sieve.el b/lisp/gnus/sieve.el index 71a4a7905a8..0e46cb66361 100644 --- a/lisp/gnus/sieve.el +++ b/lisp/gnus/sieve.el @@ -257,7 +257,7 @@ Used to bracket operations which move point in the sieve-buffer." (erase-buffer) (buffer-disable-undo) (insert "\ -Server : " server ":" (or port "2000") " +Server : " server ":" (or port sieve-manage-default-port) " ") (set (make-local-variable 'sieve-buffer-header-end) -- 2.39.2