[Emacs-diffs] Changes to emacs/lisp/gnus/spam-report.el

[Miles Bader]

Index: emacs/lisp/gnus/spam-report.el
diff -c emacs/lisp/gnus/spam-report.el:1.10 emacs/lisp/gnus/spam-report.el:1.11
*** emacs/lisp/gnus/spam-report.el:1.10 Fri Sep  9 01:47:33 2005
--- emacs/lisp/gnus/spam-report.el      Sun Sep 11 22:02:04 2005
***************
*** 116,122 ****
                         (match-string 1 field)))
            (setq report (match-string 2 field))
            (when (string-equal "permalink.gmane.org" host)
!             (setq host "spam.gmane.org"))
            (setq url (format "http://%s%s"; host report))
            (if (not (and host report url))
                (gnus-message
--- 116,124 ----
                         (match-string 1 field)))
            (setq report (match-string 2 field))
            (when (string-equal "permalink.gmane.org" host)
!             (setq host "spam.gmane.org")
!             (setq report (gnus-replace-in-string
!                           report "/\\([0-9]+\\)$" ":\\1")))
            (setq url (format "http://%s%s"; host report))
            (if (not (and host report url))
                (gnus-message