*** sb-yahoo.el.~1.15.~	2003-05-17 05:52:10.000000000 +0900
--- sb-yahoo.el	2003-05-29 18:47:53.000000000 +0900
***************
*** 93,99 ****
  	(when (re-search-forward "<!--- OUTLINE_TABLE -->" nil t)
  	  (delete-region (point) (point-max))
  	  (goto-char (point-min))
! 	  (while (re-search-forward "<a href=\"\\(http://headlines.yahoo.co.jp/hl\\?a=\\([0-9][0-9][0-9][0-9]\\)\\([0-9][0-9]\\)\\([0-9][0-9]\\)-\\([0-9]+\\)-[^\"]+\\)\">\\([^<]+\\)</a>\\([^0-9]\\|[\n\r]\\)*\\([0-9]+日[^0-9]*\\)?\\([0-9]+\\)時\\([0-9]+\\)分" nil t)
  	    (let ((url (match-string 1))
  		  (year (match-string 2))
  		  (month (match-string 3))
--- 93,99 ----
  	(when (re-search-forward "<!--- OUTLINE_TABLE -->" nil t)
  	  (delete-region (point) (point-max))
  	  (goto-char (point-min))
! 	  (while (re-search-forward "<a href=\"\\(http://headlines.yahoo.co.jp/hl\\?a=\\([0-9][0-9][0-9][0-9]\\)\\([0-9][0-9]\\)\\([0-9][0-9]\\)-\\([0-9]+-[^\"]+\\)\\)\">\\([^<]+\\)</a>\\([^0-9]\\|[\n\r]\\)*\\([0-9]+日[^0-9]*\\)?\\([0-9]+\\)時\\([0-9]+\\)分" nil t)
  	    (let ((url (match-string 1))
  		  (year (match-string 2))
  		  (month (match-string 3))