Commit 980f570a authored by Glenn Morris's avatar Glenn Morris
Browse files

Small sieve.el fix for bug #7720.

* lisp/gnus/sieve.el (sieve-open-server): Give a more explicit error if
sieve-manage-open returns nil.
parent d368a340
2011-01-03 Glenn Morris <rgm@gnu.org>
* sieve.el (sieve-open-server): Give a more explicit error if
sieve-manage-open returns nil. (Bug#7720)
2011-01-02 Lars Magne Ingebrigtsen <larsi@gnus.org>
 
* nnimap.el (nnimap-login): Prefer AUTH=CRAM-MD5, if it's available.
......
......@@ -322,9 +322,10 @@ Server : " server ":" (or port "2000") "
(defun sieve-open-server (server &optional port)
"Open SERVER (on PORT) and authenticate."
(with-current-buffer
;; open server
(set (make-local-variable 'sieve-manage-buffer)
(sieve-manage-open server))
(or ;; open server
(set (make-local-variable 'sieve-manage-buffer)
(sieve-manage-open server))
(error "Error opening server %s" server))
(sieve-manage-authenticate)))
(defun sieve-refresh-scriptlist ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment