X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fsieve-manage.el;fp=lisp%2Fsieve-manage.el;h=b96261764e53811ccb2caa767560dfb5b77498f0;hb=462da662b7ae3ce08c9dca4d9233e583aac1904e;hp=22c1f7036bfdc043fe843298b31a9d6e1c04bcc8;hpb=54c5fdfcdcddeabaa068755f52ff6fa01e2d3c33;p=gnus

diff --git a/lisp/sieve-manage.el b/lisp/sieve-manage.el
index 22c1f7036..b96261764 100644
--- a/lisp/sieve-manage.el
+++ b/lisp/sieve-manage.el
@@ -149,9 +149,10 @@ the server support the authenticator and AUTHENTICATE is a function
 for doing the actual authentication."
   :group 'sieve-manage)
 
-(defcustom sieve-manage-default-port 2000
+(defcustom sieve-manage-default-port "sieve"
   "Default port number or service name for managesieve protocol."
-  :type 'integer
+  :type '(choice integer string)
+  :version "24.4"
   :group 'sieve-manage)
 
 (defcustom sieve-manage-default-stream 'network