From: tsuchiya <tsuchiya>
Date: Sun, 8 Oct 2000 13:19:22 +0000 (+0000)
Subject: * lisp/nnshimbun.el (nnshimbun-type-definition): Fix regular expression to extract... 
X-Git-Tag: t-gnus-6_14_5-06~5
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d416e6fdaa7c804c79db287c4073b5f6f3801e8e;p=elisp%2Fgnus.git-

* lisp/nnshimbun.el (nnshimbun-type-definition): Fix regular expression to extract article body from `ZDNet'.
---

diff --git a/ChangeLog b/ChangeLog
index 3798099..0973126 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-10-08  TSUCHIYA Masatoshi  <tsuchiya@pine.kuee.kyoto-u.ac.jp>
+
+	* lisp/nnshimbun.el (nnshimbun-type-definition): Fix regular
+	expression to extract article body from `ZDNet'.
+
 2000-10-06  Katsumi Yamaoka <yamaoka@jpl.org>
 
 	* lisp/imap.el: Require `base64' instead of to autoload it.
diff --git a/lisp/nnshimbun.el b/lisp/nnshimbun.el
index 1400590..255d2ec 100644
--- a/lisp/nnshimbun.el
+++ b/lisp/nnshimbun.el
@@ -122,8 +122,8 @@
      (index-url      . nnshimbun-url)
      (from-address   . "zdnn@softbank.co.jp")
      (make-contents  . nnshimbun-make-html-contents)
-     (contents-start . "\\(<!--BODY-->\\|[0-9]+年[0-9]+月[0-9]+日[^<]*</font></td>[ \t\r\f\n]*</tr>[ \t\r\f\n]*</table>[ \t\r\f\n]*\\(</p>\\)?\\)")
-     (contents-end   . "\\(<!--BODYEND-->\\|<div align=\"right\">\\|<\\(b\\|strong\\)>\\[</\\2>[^<]*<\\2>ZDNet/\\(JAPAN\\|USA\\)\\]\\(<[^>]+>\\)?</\\2>\\)"))
+     (contents-start . "\\(<!--BODY-->\\|<!--DATE-->\\)")
+     (contents-end   . "\\(<!--BODYEND-->\\|<!--BYLINEEND-->\\)"))
     ("mew"
      (url . "http://www.mew.org/archive/")
      (groups ,@(mapcar #'car nnshimbun-mew-groups))