Function: sieve-manage-close
sieve-manage-close is a byte-compiled function defined in
sieve-manage.el.gz.
Signature
(sieve-manage-close &optional BUFFER)
Documentation
Close connection to managesieve server in BUFFER.
If BUFFER is nil, the current buffer is used.
Source Code
;; Defined in /usr/src/emacs/lisp/net/sieve-manage.el.gz
(defun sieve-manage-close (&optional buffer)
"Close connection to managesieve server in BUFFER.
If BUFFER is nil, the current buffer is used."
(with-current-buffer (or buffer (current-buffer))
(when (sieve-manage-opened)
(sieve-manage-send "LOGOUT")
(sit-for 1))
(when (and sieve-manage-process
(memq (process-status sieve-manage-process) '(open run)))
(delete-process sieve-manage-process))
(setq sieve-manage-process nil)
(sieve-manage-erase)
t))