(mixi-search-diary-list-regexp): Follow the change of mixi.

(mixi-search-diaries): Follow the change above.

diff --git a/ChangeLog b/ChangeLog
index d541d23..e78c880 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-06-07  OHASHI Akira  <bg66@koka-in.org>
+
+       * mixi.el (mixi-search-diary-list-regexp): Follow the change of mixi.
+       (mixi-search-diaries): Follow the change above.
+
 2008-04-15  OHASHI Akira  <bg66@koka-in.org>
 
        * mixi-el: Version 1.4.1 released.

diff --git a/mixi.el b/mixi.el
index 1ed860b..e273b5f 100644 (file)
--- a/mixi.el
+++ b/mixi.el
@@ -139,7 +139,7 @@
   (autoload 'w3m-retrieve "w3m")
   (autoload 'url-retrieve-synchronously "url"))
 
-(defconst mixi-revision "$Revision: 1.186 $")
+(defconst mixi-revision "$Revision: 1.187 $")
 
 (defgroup mixi nil
   "API library for accessing to mixi."
@@ -1371,26 +1371,14 @@ Increase this value when unexpected error frequently occurs."
             (mixi-url-encode-and-quote-percent-string ,keyword)))
 
 (defconst mixi-search-diary-list-regexp
-  "<td BGCOLOR=#FDF9F2><font COLOR=#996600>̾&nbsp;&nbsp;Á°</font></td>
-<td COLSPAN=2 BGCOLOR=#FFFFFF>\\(.*\\)
-
-</td></tr>
-
-<tr>
-<td BGCOLOR=#FDF9F2><font COLOR=#996600>¥¿¥¤¥È¥ë</font></td>
-<td COLSPAN=2 BGCOLOR=#FFFFFF>\\(.+\\)</td></tr>
-
-<tr>
-<td BGCOLOR=#FDF9F2><font COLOR=#996600>ËÜ&nbsp;&nbsp;ʸ</font></td>
-<td COLSPAN=2 BGCOLOR=#FFFFFF width=\"380\">\\(.*\\)</td></tr>
-
-
-<tr>
-<td NOWRAP BGCOLOR=#FDF9F2 WIDTH=80><font COLOR=#996600>ºîÀ®Æü»þ</font></td>
-<td BGCOLOR=#FFFFFF WIDTH=220>\\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\):\\([0-9]+\\)</td>
-<td ALIGN=center BGCOLOR=#FDF9F2 width=250><a href=\"view_diary\\.pl\\?id=\\([0-9]+\\)&owner_id=\\([0-9]+\\)\"><img src=http://img\\.mixi\\.jp/img/shbtn\\.gif ALT=¾ÜºÙ¤ò¸«¤ë BORDER=0 WIDTH=104 HEIGHT=19></a></td></tr>
-</table>
-</td></tr></table>")
+ "<li>
+<div class=\"listIcon\"><a href=\"view_diary\\.pl\\?id=\\([0-9]+\\)&owner_id=\\([0-9]+\\)\"><img src=\".*\" alt=\".*\" /></a>
+<span class=\"name\"><a href=\"view_diary\\.pl\\?id=[0-9]+&owner_id=[0-9]+\">\\(.*\\)</a></span></div>
+<div class=\"listContents\">
+<div class=\"heading\"><a href=\"view_diary\\.pl\\?id=[0-9]+&owner_id=[0-9]+\" class=\"name\">\\(.+\\)</a><span class=\"date\">\\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\):\\([0-9]+\\)</span></div>
+<p class=\"description\">\\(.*\\)
+</div>
+</li>")
 
 ;;;###autoload
 (defun mixi-search-diaries (keyword &optional range)
@@ -1400,20 +1388,20 @@ Increase this value when unexpected error frequently occurs."
        (year (nth 5 (decode-time (current-time))))
        (month (nth 4 (decode-time (current-time)))))
     (mapcar (lambda (item)
-               (let ((month-of-item (string-to-number (nth 3 item))))
+               (let ((month-of-item (string-to-number (nth 4 item))))
                  (when (> month-of-item month)
                    (decf year))
                  (setq month month-of-item)
-                 (mixi-make-diary (mixi-make-friend (nth 8 item) (nth 0 item))
-                                  (nth 7 item)
+                 (mixi-make-diary (mixi-make-friend (nth 1 item) (nth 2 item))
+                                  (nth 0 item)
                                   nil
                                   (encode-time
-                                   0 (string-to-number (nth 6 item))
+                                   0 (string-to-number (nth 7 item))
+                                   (string-to-number (nth 6 item))
                                    (string-to-number (nth 5 item))
-                                   (string-to-number (nth 4 item))
                                    month year)
-                                  (nth 1 item)
-                                  (nth 2 item))))
+                                  (nth 3 item)
+                                  (nth 8 item))))
            items)))
 
 (defmacro mixi-post-diary-page ()