summaryrefslogtreecommitdiff
path: root/lisp/gnus/sieve-manage.el
diff options
context:
space:
mode:
authorGnus developers <ding@gnus.org>2010-10-05 10:46:15 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2010-10-05 10:46:15 +0000
commit562f5ce55c90f66679adc959c8aa9cc4a9bf0c83 (patch)
treeb233a5d6f5b3c86b091d781c239e8ac944d063f0 /lisp/gnus/sieve-manage.el
parent50cb700cf1e8e62261f4c1cdbdabd24a3c7aafac (diff)
downloademacs-562f5ce55c90f66679adc959c8aa9cc4a9bf0c83.tar.gz
Merge changes made in Gnus trunk.
sieve-manage.el (sieve-manage-default-stream): Make default stream customizable. gnus-html.el (gnus-html-wash-tags): Decode URL entities to avoid broken links. nnimap.el (nnimap-open-connection): Give an error if nnimap-stream is unknown. shr.el (shr-tag-em): Add <EM> tag.
Diffstat (limited to 'lisp/gnus/sieve-manage.el')
-rw-r--r--lisp/gnus/sieve-manage.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/sieve-manage.el b/lisp/gnus/sieve-manage.el
index 0f16444ca39..8749864d81b 100644
--- a/lisp/gnus/sieve-manage.el
+++ b/lisp/gnus/sieve-manage.el
@@ -162,6 +162,12 @@ for doing the actual authentication."
:type 'integer
:group 'sieve-manage)
+(defcustom sieve-manage-default-stream 'network
+ "Default stream type to use for `sieve-manage'.
+Must be a name of a stream in `sieve-manage-stream-alist'."
+ :type 'symbol
+ :group 'sieve-manage)
+
;; Internal variables:
(defconst sieve-manage-local-variables '(sieve-manage-server
@@ -174,7 +180,6 @@ for doing the actual authentication."
sieve-manage-client-eol
sieve-manage-server-eol
sieve-manage-capability))
-(defconst sieve-manage-default-stream 'network)
(defconst sieve-manage-coding-system-for-read 'binary)
(defconst sieve-manage-coding-system-for-write 'binary)
(defvar sieve-manage-stream nil)