*** empty log message ***

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bce1e67..3b139b8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+1999-11-09 00:13:25  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * nnslashdot.el (nnslashdot-request-article): Search better on
+       first article.
+
 1999-11-08 05:33:15  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus.el: Autoload gnus-subscribe-topics.

diff --git a/lisp/nnslashdot.el b/lisp/nnslashdot.el
index 3c4f543..126d79b 100644 (file)
--- a/lisp/nnslashdot.el
+++ b/lisp/nnslashdot.el
@@ -302,13 +302,13 @@
       (when (numberp article)
        (if (= article 1)
            (progn
-             (search-forward " on ")
+             (re-search-forward "Posted by .* on ")
              (forward-line 1)
              (setq contents
                    (buffer-substring
                     (point)
-                    (search-forward
-                                 "A href=http://slashdot.org/article.pl"))))
+                    (re-search-forward
+                     "^<p>.*A href=http://slashdot.org/article.pl"))))
          (search-forward (format "<a name=\"%d\">" (1- article)))
          (setq contents
                (buffer-substring