diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/nnlistserv.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/nnlistserv.el b/lisp/gnus/nnlistserv.el index 12978435f7f..b6ce46c82f2 100644 --- a/lisp/gnus/nnlistserv.el +++ b/lisp/gnus/nnlistserv.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; nnlistserv.el --- retrieving articles via web mailing list archives | 1 | ;;; nnlistserv.el --- retrieving articles via web mailing list archives |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1997, 1998, 1999, 2000, 2004 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> | 5 | ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 6 | ;; Keywords: news, mail | 6 | ;; Keywords: news, mail |
| @@ -127,7 +127,7 @@ | |||
| 127 | (nnweb-decode-entities) | 127 | (nnweb-decode-entities) |
| 128 | (while headers | 128 | (while headers |
| 129 | (goto-char (point-min)) | 129 | (goto-char (point-min)) |
| 130 | (re-search-forward (format "<!-- %s=\"\\([^\"]+\\)" (car headers) nil t)) | 130 | (re-search-forward (format "<!-- %s=\"\\([^\"]+\\)" (car headers)) nil t) |
| 131 | (set (pop headers) (match-string 1))) | 131 | (set (pop headers) (match-string 1))) |
| 132 | (goto-char (point-min)) | 132 | (goto-char (point-min)) |
| 133 | (search-forward "<!-- body" nil t) | 133 | (search-forward "<!-- body" nil t) |