[Emacs-diffs] Changes to emacs/lisp/gnus/nnlistserv.el [gnus-5_10-branch]

[Reiner Steib]

Index: emacs/lisp/gnus/nnlistserv.el
diff -c emacs/lisp/gnus/nnlistserv.el:1.7.2.1 
emacs/lisp/gnus/nnlistserv.el:1.7.2.2
*** emacs/lisp/gnus/nnlistserv.el:1.7.2.1       Thu Jul 22 16:45:51 2004
--- emacs/lisp/gnus/nnlistserv.el       Mon Aug 30 18:18:30 2004
***************
*** 1,6 ****
  ;;; nnlistserv.el --- retrieving articles via web mailing list archives
  
! ;; Copyright (C) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
  
  ;; Author: Lars Magne Ingebrigtsen <address@hidden>
  ;; Keywords: news, mail
--- 1,6 ----
  ;;; nnlistserv.el --- retrieving articles via web mailing list archives
  
! ;; Copyright (C) 1997, 1998, 1999, 2000, 2004 Free Software Foundation, Inc.
  
  ;; Author: Lars Magne Ingebrigtsen <address@hidden>
  ;; Keywords: news, mail
***************
*** 122,128 ****
      (mm-url-decode-entities)
      (while headers
        (goto-char (point-min))
!       (re-search-forward (format "<!-- %s=\"\\([^\"]+\\)" (car headers) nil 
t))
        (set (pop headers) (match-string 1)))
      (goto-char (point-min))
      (search-forward "<!-- body" nil t)
--- 122,128 ----
      (mm-url-decode-entities)
      (while headers
        (goto-char (point-min))
!       (re-search-forward (format "<!-- %s=\"\\([^\"]+\\)" (car headers)) nil 
t)
        (set (pop headers) (match-string 1)))
      (goto-char (point-min))
      (search-forward "<!-- body" nil t)