From: ueno <ueno>
Date: Tue, 5 Jun 2007 05:10:27 +0000 (+0000)
Subject: * riece-twitter.el (riece-twitter-message-filter): Send a "source"
X-Git-Tag: riece-5_0_0~50
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5ec2f664141ef6f120dc5c213c843eb8de9b50bf;p=elisp%2Friece.git

* riece-twitter.el (riece-twitter-message-filter): Send a "source"
parameter.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4189da2..2e5b0f3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-06-05  Daiki Ueno  <ueno@unixuser.org>
+
+	* riece-twitter.el (riece-twitter-message-filter): Send a "source"
+	parameter.
+
 2007-05-29  Daiki Ueno  <ueno@unixuser.org>
 
 	* Riece: Version 4.0.0 released.
diff --git a/lisp/riece-twitter.el b/lisp/riece-twitter.el
index 3555f5c..214d03f 100644
--- a/lisp/riece-twitter.el
+++ b/lisp/riece-twitter.el
@@ -59,6 +59,7 @@
 	 "-H" (concat "X-Twitter-Client-Version: " riece-version-number)
 	 "-H" "X-Twitter-Client-URL: http://riece.nongnu.org/twitter.xml"
 	 "-u" credential
+	 "-d" "source=riece"
 	 "-d" (concat "status="
 		      (riece-twitter-escape-string
 		       (encode-coding-string (riece-message-text message)