+2008-02-12 OHASHI Akira <bg66@koka-in.org>
+
+ * mixi.el (mixi-news-finished-regexp): Follow the change of mixi.
+ (mixi-news-title-regexp): Ditto.
+ (mixi-news-media-time-regexp): Ditto.
+ (mixi-news-content-regexp): Ditto.
+ (mixi-news-list-regexp): Ditto.
+ (mixi-get-news): Follow the change above.
+
2008-01-30 OHASHI Akira <bg66@koka-in.org>
* mixi-el: Version 1.3.0 released.
(autoload 'w3m-retrieve "w3m")
(autoload 'url-retrieve-synchronously "url"))
-(defconst mixi-revision "$Revision: 1.182 $")
+(defconst mixi-revision "$Revision: 1.183 $")
(defgroup mixi nil
"API library for accessing to mixi."
"&media_id=" (mixi-news-media-id ,news)))
(defconst mixi-news-finished-regexp
- "¿½¤·Ìõ¤´¤¶¤¤¤Þ¤»¤ó¤¬¡¢¤³¤Î¥Ë¥å¡¼¥¹¤Ï·ÇºÜ¤¬½ªÎ»¤·¤¿¤«¡¢URL¤¬´Ö°ã¤Ã¤Æ¤¤¤¤¤ë¤¿¤á¤´Í÷¤¤¤¿¤À¤±¤Þ¤»¤ó¡£</td>")
+ "<p class=\"supplement01\">¢¨¿½¤·Ìõ¤¢¤ê¤Þ¤»¤ó¤¬¡¢¤³¤Î¥Ë¥å¡¼¥¹¤Ï·ÇºÜ´ü´Ö¤¬½ªÎ»¤·¤¿¤«¡¢URL¤¬´Ö°ã¤Ã¤Æ¤¤¤ë¤¿¤á¤´Í÷¤¤¤¿¤À¤±¤Þ¤»¤ó¡£¾Ü¤·¤¯¤Ï<a href=\"http://mixi.jp/help.pl#16h\">¤³¤Á¤é</a>¤ò¤´Í÷¤¯¤À¤µ¤¤¡£</p>")
(defconst mixi-news-title-regexp
- "<td HEIGHT=\"46\" STYLE=\"font-weight: bold;font-size: 14px;\" CLASS=\"h130\">\\(.+\\)\\(
-\\)?</td>")
+ "<div class=\"articleH[ae][ae]ding\">
+<h2>\\(.+\\)</h2>")
(defconst mixi-news-media-time-regexp
- "<td COLSPAN=\"2\" ALIGN=\"right\">(\\(.+\\) - \\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\):\\([0-9]+\\))</td></tr>")
+ "<p class=\"date\">¡Ê\\(.+\\) - \\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\):\\([0-9]+\\)¡Ë</p>")
(defconst mixi-news-content-regexp
- "<td CLASS=\"h150\">
-
+ "<div class=\"article\">
\\(.+\\)
-<br>
-\\(.*
-\\)?
-\\(</td>\\|<br>\\)")
+
+\\(</div>
+</div>\\|<div class=\"additional\">\\)")
(defun mixi-realize-news (news)
"Realize a NEWS."
"&type=bn"))
(defconst mixi-news-list-regexp
- "<tr bgcolor=\"\\(#FCF5EB\\|#FFFFFF\\)\">
-<td WIDTH=\"1%\" valign=top CLASS=\"h120\">¡¦</td>
-<td WIDTH=\"97%\" CLASS=\"h120\"><A HREF=\"view_news\\.pl\\?id=\\([0-9]+\\)&media_id=\\([0-9]+\\)\"class=\"new_link\">\\(.+\\)</A>
-\\(<IMG SRC=\"http://img\\.mixi\\.jp/img/news_camera3\\.gif\" WIDTH=\"11\" HEIGHT=\"12\">\\|\\)
-
-</td>
-<td WIDTH=\"1%\" nowrap CLASS=\"f08\"><A HREF=\"list_news_media\\.pl\\?id=[0-9]+\">\\(.+\\)</A></td>
-<td WIDTH=\"1%\" nowrap CLASS=\"f08\">\\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\):\\([0-9]+\\)</td></tr>")
+ "<td class=\"newsTitle\"><p>¡¦ <a href=\"view_news\\.pl\\?id=\\([0-9]+\\)&media_id=\\([0-9]+\\)\">\\(.+\\)</a><img src=\"http://img\\.mixi\\.jp/img/news_camera3\\.gif\" width=\"11\" height=\"12\" alt=\"\" /></p></td>
+<td class=\"media\"><a href=\"list_news_media\\.pl\\?id=[0-9]+\">\\(.+\\)</a></td>
+<td class=\"date\">\\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\):\\([0-9]+\\)</td>")
;;;###autoload
(defun mixi-get-news (category sort &optional range)
(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 6 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-news (nth 2 item) (nth 1 item) (nth 5 item)
+ (mixi-make-news (nth 1 item) (nth 0 item) (nth 3 item)
(encode-time
- 0 (string-to-number (nth 9 item))
- (string-to-number (nth 8 item))
- (string-to-number (nth 7 item))
+ 0 (string-to-number (nth 7 item))
+ (string-to-number (nth 6 item))
+ (string-to-number (nth 5 item))
month year)
- (nth 3 item))))
+ (nth 2 item))))
items)))
(provide 'mixi)