Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
6ab3804a
Commit
6ab3804a
authored
Oct 04, 2007
by
Juanma Barranquero
Browse files
(sieve-manage-interactive-login): Doc fix.
(sieve-manage-open): Use `mapc' instead of `mapcar'.
parent
de3054d5
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
2 deletions
+7
-2
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+5
-0
lisp/gnus/sieve-manage.el
lisp/gnus/sieve-manage.el
+2
-2
No files found.
lisp/gnus/ChangeLog
View file @
6ab3804a
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):
...
...
lisp/gnus/sieve-manage.el
View file @
6ab3804a
...
...
@@ -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 w
here
sucessful authenticating itself to the server, nil otherwise.
it w
as
suc
c
essful 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
)
(
mapc
ar
'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
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment