[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/nnweb.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/nnweb.el,v |
Date: |
Tue, 09 Jan 2007 05:40:40 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 07/01/09 05:40:39
Index: nnweb.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/nnweb.el,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -b -r1.26 -r1.27
--- nnweb.el 16 Aug 2006 14:04:41 -0000 1.26
+++ nnweb.el 9 Jan 2007 05:40:39 -0000 1.27
@@ -480,7 +480,7 @@
(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 @@
(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")
- [Emacs-diffs] Changes to emacs/lisp/gnus/nnweb.el,v,
Miles Bader <=