Include retweet-count' and favorite-count' in a tweet alist.

* twittering-mode.el: Include `retweet-count' and `favorite-count'
in an alist representing a tweet.
(twittering-extract-common-element-from-json): include
`retweet-count' and `favorite-count' in an alist representing a
tweet.

ChangeLog

@@ -7,6 +7,12 @@
 	(twittering-call-api-with-account-in-api1.1): use `recent' as the
 	`result_type' of search API.
 
+	* twittering-mode.el: Include `retweet-count' and `favorite-count'
+	in an alist representing a tweet.
+	(twittering-extract-common-element-from-json): include
+	`retweet-count' and `favorite-count' in an alist representing a
+	tweet.
+
 2013-12-09  tomykaira  <tomykaira@gmail.com>
 
 	* twittering-mode.el: Fix arguments of `twittering-http-post'.

twittering-mode.el

@@ -7008,7 +7008,10 @@ to JSON objects from ordinary timeline and search timeline."
 			       . ,(cdr (assq 'display_url entry)))
 			      (expanded-url
 			       . ,(cdr (assq 'expanded_url entry))))))
-			urls))))))
+			urls)))
+      (retweet-count . ,(cdr (assq 'retweet_count json-object)))
+      (favorite-count . ,(cdr (assq 'favorite_count json-object)))
+      )))
 
 (defun twittering-json-object-to-a-status (json-object)
   "Convert JSON-OBJECT representing a tweet into an alist representation.