From: bg66 <bg66>
Date: Wed, 18 Mar 2009 11:10:08 +0000 (+0000)
Subject: (mixi-post-echo): Follow the change of mixi.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ac17113829f33b0afa7bb9976df17190ef7fe040;p=elisp%2Fmixi.git

(mixi-post-echo): Follow the change of mixi.
---

diff --git a/ChangeLog b/ChangeLog
index e68ac2e..77a1d14 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2009-03-18  OHASHI Akira  <bg66@koka-in.org>
+
+	* mixi.el (mixi-post-echo): Follow the change of mixi.
+
 2009-03-13  OHASHI Akira  <bg66@koka-in.org>
 
 	* mixi-el: Version 2.2.1 released.
diff --git a/mixi.el b/mixi.el
index 27fd80a..171c070 100644
--- a/mixi.el
+++ b/mixi.el
@@ -139,7 +139,7 @@
   (autoload 'w3m-retrieve "w3m")
   (autoload 'url-retrieve-synchronously "url"))
 
-(defconst mixi-revision "$Revision: 1.204 $")
+(defconst mixi-revision "$Revision: 1.205 $")
 
 (defgroup mixi nil
   "API library for accessing to mixi."
@@ -3254,7 +3254,7 @@ Increase this value when unexpected error frequently occurs."
   (unless (or (null parent) (mixi-echo-p parent))
     (signal 'wrong-type-argument (list 'mixi-echo-p parent)))
   (let (fields post-key)
-    (with-mixi-retrieve (mixi-post-echo-page)
+    (with-mixi-retrieve (format (mixi-new-echo-list-page) 1)
       (if (re-search-forward mixi-post-key-regexp nil t)
 	  (setq post-key (match-string 1))
 	(mixi-post-error 'cannot-find-key)))