--- shimbun/sb-slashdot-jp.el.orig Fri Mar 1 16:58:31 2002 +++ shimbun/sb-slashdot-jp.el Wed Jul 31 13:05:16 2002 @@ -97,6 +97,7 @@ (with-temp-buffer (let (begin) (when (and (shimbun-retrieve-url (shimbun-header-xref head)) + (goto-char (point-min)) (search-forward shimbun-slashdot-jp-story-article-start-pattern nil t) (setq begin (point)) @@ -110,6 +111,7 @@ (with-temp-buffer (let (begin end) (when (and (shimbun-retrieve-url (shimbun-header-xref head)) + (goto-char (point-min)) (shimbun-slashdot-jp-search-comment-head shimbun sid cid) (re-search-forward "
]*>" nil t)) (delete-region (point-min) (match-beginning 0)) @@ -204,6 +206,7 @@ (* num shimbun-slashdot-jp-story-count)) (shimbun-url-internal shimbun)) 'reload) + (goto-char (point-min)) (search-forward shimbun-slashdot-jp-story-head-start-pattern nil t) (setq begin (point)) @@ -247,6 +250,7 @@ (with-temp-buffer (when (shimbun-retrieve-url (shimbun-slashdot-jp-sid-url shimbun sid) 'reload) + (goto-char (point-min)) (while (setq head (shimbun-slashdot-jp-search-comment-head shimbun sid nil parent)) |