From: bg66 <bg66>
Date: Wed, 17 Jan 2007 10:40:44 +0000 (+0000)
Subject: * mixi.el: (mixi-realize-message): Follow the change of mixi.
X-Git-Tag: mixi-el-1_0_0~100
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=42bfd55e4af533a013f67c2d2fba22e400bcceb8;p=elisp%2Fmixi.git

* mixi.el: (mixi-realize-message): Follow the change of mixi.
---

diff --git a/ChangeLog b/ChangeLog
index 63e0c4b..ad7dea0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2007-01-17  OHASHI Akira  <bg66@koka-in.org>
 
+	* mixi.el: (mixi-realize-message): Follow the change of mixi.
+
+2007-01-17  OHASHI Akira  <bg66@koka-in.org>
+
 	* mixi.el: (with-mixi-retrieve): Don't bind `buffer' variable.
 	(with-mixi-post-form): Ditto.
 	(mixi-get-matched-items): Follow the change above.
diff --git a/mixi.el b/mixi.el
index e65181a..ed00996 100644
--- a/mixi.el
+++ b/mixi.el
@@ -2370,10 +2370,10 @@ Increase this value when unexpected error frequently occurs."
 
 (defconst mixi-message-owner-regexp
   "<font COLOR=#996600>\\(º¹½Ð¿Í\\|°¸&nbsp;Àè\\)</font>&nbsp;:&nbsp;<a HREF=\"show_friend\\.pl\\?id=\\([0-9]+\\)\">\\(.*\\)\\(</a>\\|</td>\\)")
-(defconst mixi-message-title-regexp
-"<font COLOR=#996600>·ï\\(¡¡\\|&nbsp;\\)̾</font>&nbsp;:&nbsp;\\(.+\\)\n?</td>")
 (defconst mixi-message-time-regexp
 "<font COLOR=#996600>Æü\\(¡¡\\|&nbsp;\\)ÉÕ</font>&nbsp;:&nbsp;\\([0-9]+\\)ǯ\\([0-9]+\\)·î\\([0-9]+\\)Æü \\([0-9]+\\)»þ\\([0-9]+\\)ʬ&nbsp;&nbsp;")
+(defconst mixi-message-title-regexp
+"<font COLOR=#996600>·ï\\(¡¡\\|&nbsp;\\)̾</font>&nbsp;:&nbsp;\\(.+\\)\n?</td>")
 (defconst mixi-message-content-regexp
   "<tr><td CLASS=h120>\\(.+\\)</td></tr>")
 
@@ -2386,9 +2386,6 @@ Increase this value when unexpected error frequently occurs."
 				  (mixi-make-friend (match-string 2)
 						    (match-string 3)))
 	(mixi-realization-error 'cannot-find-owner message))
-      (if (re-search-forward mixi-message-title-regexp nil t)
-	  (mixi-message-set-title message (match-string 2))
-	(mixi-realization-error 'cannot-find-title message))
       (if (re-search-forward mixi-message-time-regexp nil t)
 	  (mixi-message-set-time
 	   message (encode-time 0 (string-to-number (match-string 6))
@@ -2397,6 +2394,9 @@ Increase this value when unexpected error frequently occurs."
 				(string-to-number (match-string 3))
 				(string-to-number (match-string 2))))
 	(mixi-realization-error 'cannot-find-time message))
+      (if (re-search-forward mixi-message-title-regexp nil t)
+	  (mixi-message-set-title message (match-string 2))
+	(mixi-realization-error 'cannot-find-title message))
       (if (re-search-forward mixi-message-content-regexp nil t)
 	  (mixi-message-set-content message (match-string 1))
 	(mixi-realization-error 'cannot-find-content message)))