From: bg66 <bg66>
Date: Wed, 20 Jun 2007 09:12:32 +0000 (+0000)
Subject: (mixi-diary-list-regexp): Follow the change of mixi.
X-Git-Tag: mixi-el-1_0_0~30
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9427f9ee4ec252be36b6321e7131fe93fa4c212c;p=elisp%2Fmixi.git

(mixi-diary-list-regexp): Follow the change of mixi.
(mixi-get-diaries): Follow the change above.
(mixi-news-finished-regexp): Follow the change of mixi.
---

diff --git a/ChangeLog b/ChangeLog
index a76d3ae..2cffac9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2007-06-20  OHASHI Akira  <bg66@koka-in.org>
+
+	* mixi.el (mixi-diary-list-regexp): Follow the change of mixi.
+	(mixi-get-diaries): Follow the change above.
+	(mixi-news-finished-regexp): Follow the change of mixi.
+
 2007-06-19  OHASHI Akira  <bg66@koka-in.org>
 
 	* mixi.el (mixi-post-key-regexp): Follow the change of mixi.
diff --git a/mixi.el b/mixi.el
index 91b7fd8..32672e0 100644
--- a/mixi.el
+++ b/mixi.el
@@ -1265,7 +1265,7 @@ Increase this value when unexpected error frequently occurs."
 
 (defconst mixi-diary-list-regexp
   "<tr VALIGN=top>
-<td ALIGN=center ROWSPAN=3 NOWRAP bgcolor=#F2DDB7><font COLOR=#996600>\\([0-9]+\\)·î\\([0-9]+\\)Æü<br>\\([0-9]+\\):\\([0-9]+\\)</font>\\(<br><input type=\"checkbox\" name=\"diary_id\" value=\"[0-9]+\">\\|\\)</td>
+<td ALIGN=center ROWSPAN=3 NOWRAP bgcolor=#F2DDB7><font COLOR=#996600>\\([0-9]+\\)ǯ<br />\\([0-9]+\\)·î\\([0-9]+\\)Æü<br>\\([0-9]+\\):\\([0-9]+\\)</font>\\(<br><input type=\"checkbox\" name=\"diary_id\" value=\"[0-9]+\">\\|\\)</td>
 <td bgcolor=\"#FFF4E0\">&nbsp;<a href=\"view_diary\\.pl\\?id=\\([0-9]+\\)&owner_id=[0-9]+\">\\(.*\\)</a></td>")
 
 ;;;###autoload
@@ -1283,21 +1283,16 @@ Increase this value when unexpected error frequently occurs."
       (signal 'wrong-type-argument (list 'mixi-friend-p friend)))
     (let ((items (mixi-get-matched-items (mixi-diary-list-page friend)
 					 mixi-diary-list-regexp
-					 range))
-	  (year (nth 5 (decode-time (current-time))))
-	  (month (nth 4 (decode-time (current-time)))))
+					 range)))
       (mapcar (lambda (item)
-		(let ((month-of-item (string-to-number (nth 0 item))))
-		  (when (> month-of-item month)
-		    (decf year))
-		  (setq month month-of-item)
-		  (mixi-make-diary friend (nth 5 item) nil
-				   (encode-time
-				    0 (string-to-number (nth 3 item))
-				    (string-to-number (nth 2 item))
-				    (string-to-number (nth 1 item))
-				    month year)
-				   (nth 6 item))))
+		(mixi-make-diary friend (nth 6 item) nil
+				 (encode-time
+				  0 (string-to-number (nth 4 item))
+				  (string-to-number (nth 3 item))
+				  (string-to-number (nth 2 item))
+				  (string-to-number (nth 1 item))
+				  (string-to-number (nth 0 item)))
+				  (nth 7 item)))
 	      items))))
 
 (defmacro mixi-new-diary-list-page ()
@@ -2790,7 +2785,7 @@ Increase this value when unexpected error frequently occurs."
 
 
 (defconst mixi-news-finished-regexp
-  "<td ALIGN=center background=http://img\\.mixi\\.jp/img/bg_line\\.gif> ¿½¤·Ìõ¤´¤¶¤¤¤Þ¤»¤ó¤¬¡¢¤³¤Î¥Ë¥å¡¼¥¹¤Ï·ÇºÜ½ªÎ»¤·¤Þ¤·¤¿¡£</td>")
+  "¿½¤·Ìõ¤´¤¶¤¤¤Þ¤»¤ó¤¬¡¢¤³¤Î¥Ë¥å¡¼¥¹¤Ï·ÇºÜ¤¬½ªÎ»¤·¤¿¤«¡¢URL¤¬´Ö°ã¤Ã¤Æ¤¤¤¤¤ë¤¿¤á¤´Í÷¤¤¤¿¤À¤±¤Þ¤»¤ó¡£</td>")
 (defconst mixi-news-title-regexp
   "<td HEIGHT=\"46\" STYLE=\"font-weight: bold;font-size: 14px;\" CLASS=\"h130\">\\(.+\\)\\(
 \\)?</td>")