Mercurial > emacs
changeset 85034:8e5644592b67
(sieve-manage-interactive-login): Doc fix.
(sieve-manage-open): Use `mapc' instead of `mapcar'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Thu, 04 Oct 2007 11:54:01 +0000 |
| parents | 0d62f6d35184 |
| children | ce7288944fc5 |
| files | lisp/gnus/sieve-manage.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/sieve-manage.el Thu Oct 04 11:25:29 2007 +0000 +++ b/lisp/gnus/sieve-manage.el Thu Oct 04 11:54:01 2007 +0000 @@ -183,7 +183,7 @@ (defun sieve-manage-interactive-login (buffer loginfunc) "Login to server in BUFFER. LOGINFUNC is passed a username and a password, it should return t if -it where sucessful authenticating itself to the server, nil otherwise. +it was successful authenticating itself to the server, nil otherwise. Returns t if login was successful, nil otherwise." (with-current-buffer buffer (make-local-variable 'sieve-manage-username) @@ -372,7 +372,7 @@ to work in." (setq buffer (or buffer (format " *sieve* %s:%d" server (or port 2000)))) (with-current-buffer (get-buffer-create buffer) - (mapcar 'make-local-variable sieve-manage-local-variables) + (mapc 'make-local-variable sieve-manage-local-variables) (sieve-manage-disable-multibyte) (buffer-disable-undo) (setq sieve-manage-server (or server sieve-manage-server))