1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-30 19:53:09 +00:00

Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-187

Merge from gnus--rel--5.10

Patches applied:

 * gnus--rel--5.10  (patch 39-44)

   - Merge from emacs--cvs-trunk--0
   - Update from CVS

2005-03-16  Reiner Steib  <Reiner.Steib@gmx.de>

   * lisp/gnus/nnimap.el (nnimap-open-connection): Print which authinfo file is
   used.

   * lisp/gnus/nneething.el (nneething-map-file-directory): Derive from
   `gnus-directory'.

   * lisp/gnus/gnus-art.el (gnus-header-button-alist): Use `gnus-msg-mail' for
   the To/Cc button.

2005-03-15  Reiner Steib  <Reiner.Steib@gmx.de>

   * lisp/gnus/nnmaildir.el (nnmaildir-request-accept-article): Use
   `nnheader-cancel-timer' for compatibility with current XEmacs.

2005-03-13  Steve Youngs  <steve@sxemacs.org>

   * lisp/gnus/gnus.el: Don't try and mark `gnus-agent-save-groups' as an
   autoloaded function.
   From: Andrey Slusar <anrays@gmail.com>.

2005-03-13  Steve Youngs  <steve@sxemacs.org>

   * lisp/gnus/mm-url.el: Require timer-funcs at compile time when in XEmacs
   for `with-timeout'.

   * lisp/gnus/mail-source.el: Require timer-funcs at compile time when in
   XEmacs for `run-with-idle-timer'.

   * lisp/gnus/gnus-async.el: Ditto.

   * lisp/gnus/dgnushack.el: No need to ignore `run-with-idle-timer', XEmacs
   has this function now.
This commit is contained in:
Miles Bader 2005-03-18 02:49:57 +00:00
parent 968a667962
commit fa9a04e10b
9 changed files with 51 additions and 7 deletions

View File

@ -1,3 +1,38 @@
2005-03-16 Reiner Steib <Reiner.Steib@gmx.de>
* nnimap.el (nnimap-open-connection): Print which authinfo file is
used.
* nneething.el (nneething-map-file-directory): Derive from
`gnus-directory'.
* gnus-art.el (gnus-header-button-alist): Use `gnus-msg-mail' for
the To/Cc button.
2005-03-15 Reiner Steib <Reiner.Steib@gmx.de>
* nnmaildir.el (nnmaildir-request-accept-article): Use
`nnheader-cancel-timer' for compatibility with current XEmacs.
2005-03-13 Steve Youngs <steve@sxemacs.org>
* gnus.el: Don't try and mark `gnus-agent-save-groups' as an
autoloaded function.
From: Andrey Slusar <anrays@gmail.com>.
2005-03-13 Steve Youngs <steve@sxemacs.org>
* mm-url.el: Require timer-funcs at compile time when in XEmacs
for `with-timeout'.
* mail-source.el: Require timer-funcs at compile time when in
XEmacs for `run-with-idle-timer'.
* gnus-async.el: Ditto.
* dgnushack.el: No need to ignore `run-with-idle-timer', XEmacs
has this function now.
2005-03-16 Lute Kamstra <lute@gnu.org>
* message.el (message-make-date): Require parse-time.

View File

@ -6336,7 +6336,7 @@ variable it the real callback function."
("^\\(From\\|Reply-To\\):" ": *\\(.+\\)$"
1 (>= gnus-button-message-level 0) gnus-button-reply 1)
("^\\(Cc\\|To\\):" "[^ \t\n<>,()\"]+@[^ \t\n<>,()\"]+"
0 (>= gnus-button-message-level 0) gnus-button-mailto 0)
0 (>= gnus-button-message-level 0) gnus-msg-mail 0)
("^X-[Uu][Rr][Ll]:" gnus-button-url-regexp
0 (>= gnus-button-browse-level 0) browse-url 0)
("^Subject:" gnus-button-url-regexp

View File

@ -32,6 +32,10 @@
(require 'gnus-sum)
(require 'nntp)
(eval-when-compile
(when (featurep 'xemacs)
(require 'timer-funcs)))
(defgroup gnus-asynchronous nil
"Support for asynchronous operations."
:group 'gnus)

View File

@ -2726,7 +2726,7 @@ gnus-registry.el will populate this if it's loaded.")
gnus-async-prefetch-article gnus-async-prefetch-remove-group
gnus-async-halt-prefetch)
("gnus-agent" gnus-open-agent gnus-agent-get-function
gnus-agent-save-groups gnus-agent-save-active gnus-agent-method-p
gnus-agent-save-active gnus-agent-method-p
gnus-agent-get-undownloaded-list gnus-agent-fetch-session
gnus-summary-set-agent-mark gnus-agent-save-group-info
gnus-agent-request-article gnus-agent-retrieve-headers)

View File

@ -862,7 +862,7 @@ See the Gnus manual for details."
(eval-when-compile
(if (featurep 'xemacs)
(require 'itimer)
(require 'timer-funcs)
(require 'timer)))
(defun mail-source-start-idle-timer ()

View File

@ -38,7 +38,9 @@
(autoload 'executable-find "executable"))
(eval-when-compile
(require 'timer))
(if (featurep 'xemacs)
(require 'timer-funcs)
(require 'timer)))
(defgroup mm-url nil
"A wrapper of url package and external url command for Gnus."

View File

@ -37,7 +37,8 @@
(nnoo-declare nneething)
(defvoo nneething-map-file-directory "~/.nneething/"
(defvoo nneething-map-file-directory
(nnheader-concat gnus-directory ".nneething/")
"Where nneething stores the map files.")
(defvoo nneething-map-file ".nneething"

View File

@ -728,7 +728,9 @@ If EXAMINE is non-nil the group is selected read-only."
(imap-capability 'IMAP4rev1 nnimap-server-buffer))
(imap-close nnimap-server-buffer)
(nnheader-report 'nnimap "Server %s is not IMAP4 compliant" server))
(let* ((list (gnus-parse-netrc nnimap-authinfo-file))
(let* ((list (progn (gnus-message 7 "Parsing authinfo file `%s'."
nnimap-authinfo-file)
(gnus-parse-netrc nnimap-authinfo-file)))
(port (if nnimap-server-port
(int-to-string nnimap-server-port)
"imap"))

View File

@ -1344,7 +1344,7 @@ by nnmaildir-request-article.")
(write-region (point-min) (point-max) tmpfile nil 'no-message nil
'excl)
(unix-sync))) ;; no fsync :(
(cancel-timer 24h)
(nnheader-cancel-timer 24h)
(condition-case err
(add-name-to-file tmpfile curfile)
(error