Index: /lang/elisp/twittering-mode/branches/tsuyoshi/twittering-mode.el
===================================================================
--- /lang/elisp/twittering-mode/branches/tsuyoshi/twittering-mode.el (revision 49)
+++ /lang/elisp/twittering-mode/branches/tsuyoshi/twittering-mode.el (revision 50)
@@ -100,5 +100,5 @@
   (twittering-get-or-generate-buffer twittering-buffer))
 
-(defvar twittering-http-buffer "*twittering-http-buffer*")
+(defvar twittering-http-buffer " *twittering-http-buffer*")
 (defun twittering-http-buffer ()
   (twittering-get-or-generate-buffer twittering-http-buffer))
@@ -156,5 +156,5 @@
 ;;; to show image files
 
-(defvar twittering-wget-buffer "*twittering-wget-buffer*")
+(defvar twittering-wget-buffer " *twittering-wget-buffer*")
 (defun twittering-wget-buffer ()
   (twittering-get-or-generate-buffer twittering-wget-buffer))
@@ -900,5 +900,8 @@
 	     status
 	     (("200 OK")
-	      (let ((status-data (assq-get 'status body)))
+	      (let ((status-data
+		     ;;(assq-get 'status body)
+		     (cddr (car body))
+		     ))
 		(message "status %s: favorited - %s"
 			 (assq-get 'id status-data)