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

Merge from gnus--rel--5.10

Browse source 
Patches applied:

 * gnus--rel--5.10  (patch 186-191)

   - Update from CVS

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-595
This commit is contained in:
Miles Bader 2007-01-09 05:40:39 +00:00
parent e64666972e
commit ba3612110a
4 changed files with 47 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
lisp/gnus/ChangeLog
View file

@ -1,4 +1,4 @@
2007-01-06 Reiner Steib <Reiner.Steib@gmx.de>
2007-01-07 Reiner Steib <Reiner.Steib@gmx.de>
* gnus-soup.el: Add missing :group in previous change.
@ -7,6 +7,32 @@
* gnus-soup.el (gnus-soup): New custom group. Make user variables
customizable.
2007-01-03 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de>
* nnweb.el (nnweb-gmane-create-mapping): Put back code to merge the
headers read from disk with the ones newly found in the current search.
This should no longer cause problems, because the article numbers in
Gmane's `nov.php' output are ignored since the previous change.
2006-01-03 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de>
* nnweb.el (nnweb-gmane-create-mapping): Keep the mapping stable for
solid groups.
2006-01-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
* nnweb.el (nnweb-gmane-create-mapping): Use the article number from
the headers when creating the mapping to avoid mismappings.
(nnweb-gmane-create-mapping): Always nix out old mapping.
2007-01-02 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de>
* gmm-utils.el (gmm-tool-bar-style): Fix custom type.
2007-01-01 Katsumi Yamaoka <yamaoka@jpl.org>
* mm-decode.el (mm-display-external): Use itimer function for XEmacs.
2006-12-30 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de>
* gnus-sum.el (gnus-summary-insert-dormant-articles): Fix typo in

4
lisp/gnus/gmm-utils.el
View file

@ -203,8 +203,8 @@ This is copy of the `lazy' widget in Emacs 22.1 provided for compatibility."
'gnome
'retro)
"Prefered tool bar style."
:type '(choice (const :tag "GNOME style" 'gnome)
(const :tag "Retro look" 'retro))
:type '(choice (const :tag "GNOME style" gnome)
(const :tag "Retro look" retro))
:group 'gmm)
(defvar tool-bar-map)

22
lisp/gnus/mm-decode.el
View file

@ -883,13 +883,21 @@ external if displayed external."
;; a vector in Emacs but is a list in XEmacs)
;; requires that it is lexically scoped.
(timer (run-at-time 2.0 nil 'ignore)))
(lambda (process state)
(when (eq 'exit (process-status process))
(if (memq timer timer-list)
(timer-set-function timer fn)
(funcall fn))
(ignore-errors (eval fm))
(message "%s" done))))))
(if (boundp 'itimer-list)
(lambda (process state)
(when (eq 'exit (process-status process))
(if (memq timer itimer-list)
(set-itimer-function timer fn)
(funcall fn))
(ignore-errors (eval fm))
(message "%s" done)))
(lambda (process state)
(when (eq 'exit (process-status process))
(if (memq timer timer-list)
(timer-set-function timer fn)
(funcall fn))
(ignore-errors (eval fm))
(message "%s" done)))))))
(mm-handle-set-external-undisplayer
handle (cons file buffer)))
(message "Displaying %s..." command))

9
lisp/gnus/nnweb.el
View file

@ -480,7 +480,7 @@ Valid types include `google', `dejanews', and `gmane'.")
(from (mail-header-from header))
(subject (mail-header-subject header))
(rfc2047-encoding-type 'mime))
(when (string-match " \\([^:]+\\):\\([0-9]+\\)" xref)
(when (string-match " \\([^:]+\\)[:/]\\([0-9]+\\)" xref)
(mail-header-set-xref
header
(format "http://article.gmane.org/%s/%s/raw"
@ -496,11 +496,8 @@ Valid types include `google', `dejanews', and `gmane'.")
(rfc2047-encode-string subject))
(unless (nnweb-get-hashtb (mail-header-xref header))
(push
(list
(incf (cdr active))
header)
map)
(mail-header-set-number header (incf (cdr active)))
(push (list (mail-header-number header) header) map)
(nnweb-set-hashtb (cadar map) (car map))))))
(forward-line 1)))
(nnheader-message 7 "Searching Gmane...done")