procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(sieve-manage-interactive-login): Doc fix.

Browse source 
(sieve-manage-open): Use `mapc' instead of `mapcar'.
This commit is contained in:
Juanma Barranquero 2007-10-04 11:56:15 +00:00
parent de3054d517
commit 6ab3804adc
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2007-10-04 Juanma Barranquero <lekktu@gmail.com>
* sieve-manage.el (sieve-manage-interactive-login): Doc fix.
(sieve-manage-open): Use `mapc' instead of `mapcar'.
2007-10-02 Stefan Monnier <monnier@iro.umontreal.ca>
* gnus-uu.el (gnus-uu-reginize-string, gnus-uu-expand-numbers):

4
lisp/gnus/sieve-manage.el
View file

@ -183,7 +183,7 @@ Valid states are `closed', `initial', `nonauth', and `auth'.")
(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 @@ Optional variable BUFFER is buffer (buffer, or string naming buffer)
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))