Commit 3d2af193 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen Committed by Katsumi Yamaoka

Merge changes made in No Gnus

gnus.texi (Customizing the IMAP Connection): Mention nnimap-record-commands.
nnimap.el (nnimap-record-commands): New variable.
 (nnimap-log-command): Use it.
 (nnimap-make-process-buffer): Add a space to the process buffer.
parent 32f6c52b
2012-02-13 Lars Ingebrigtsen <larsi@gnus.org>
* gnus.texi (Customizing the IMAP Connection): Mention
nnimap-record-commands.
2012-02-10 Glenn Morris <rgm@gnu.org>
* url.texi (Retrieving URLs): Update url-retrieve arguments.
......
......@@ -14227,8 +14227,9 @@ if the server supports UID EXPUNGE, but it's not done by default on
servers that doesn't support that command.
@item nnimap-streaming
Virtually all @code{IMAP} server support fast streaming of data. If
you have problems connecting to the server, try setting this to @code{nil}.
Virtually all @acronym{IMAP} server support fast streaming of data.
If you have problems connecting to the server, try setting this to
@code{nil}.
@item nnimap-fetch-partial-articles
If non-@code{nil}, fetch partial articles from the server. If set to
......@@ -14236,6 +14237,10 @@ a string, then it's interpreted as a regexp, and parts that have
matching types will be fetched. For instance, @samp{"text/"} will
fetch all textual parts, while leaving the rest on the server.
@item nnimap-record-commands
If non-@code{nil}, record all @acronym{IMAP} commands in the
@samp{"*imap log*"} buffer.
@end table
2012-02-13 Lars Ingebrigtsen <larsi@gnus.org>
* nnimap.el (nnimap-record-commands): New variable.
(nnimap-log-command): Use it.
(nnimap-make-process-buffer): Add a space to the process buffer.
* shr.el (shr-rescale-image): Allow viewing large images.
2012-02-12 Lars Ingebrigtsen <larsi@gnus.org>
......
......@@ -289,7 +289,7 @@ textual parts.")
(defun nnimap-make-process-buffer (buffer)
(with-current-buffer
(generate-new-buffer (format "*nnimap %s %s %s*"
(generate-new-buffer (format " *nnimap %s %s %s*"
nnimap-address nnimap-server-port
(gnus-buffer-exists-p buffer)))
(mm-disable-multibyte)
......@@ -1696,13 +1696,17 @@ textual parts.")
(nnimap-wait-for-response nnimap-sequence))
nnimap-sequence)
(defvar nnimap-record-commands nil
"If non-nil, log commands to the \"*imap log*\" buffer.")
(defun nnimap-log-command (command)
(with-current-buffer (get-buffer-create "*imap log*")
(goto-char (point-max))
(insert (format-time-string "%H:%M:%S") " "
(if nnimap-inhibit-logging
"(inhibited)\n"
command)))
(when nnimap-record-commands
(with-current-buffer (get-buffer-create "*imap log*")
(goto-char (point-max))
(insert (format-time-string "%H:%M:%S") " "
(if nnimap-inhibit-logging
"(inhibited)\n"
command))))
command)
(defun nnimap-command (&rest args)
......
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