* riece-twitter.el (riece-twitter-update): Don't send extra headers.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a45f4de..3a5510f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-10-12  Daiki Ueno  <ueno@unixuser.org>
+
+       * riece-twitter.el (riece-twitter-update): Don't send extra headers.
+
 2007-09-04  Didier Verna  <didier@xemacs.org>
 
         * riece-addon.el (riece-addon-list-mark-face-alist): Fix misuse of

diff --git a/lisp/riece-twitter.el b/lisp/riece-twitter.el
index d828412..a88330d 100644 (file)
--- a/lisp/riece-twitter.el
+++ b/lisp/riece-twitter.el
@@ -70,11 +70,11 @@
   (let ((process
         (start-process
          "curl" nil "curl"
-         "-H" "X-Twitter-Client: Riece"
-         "-H" (concat "X-Twitter-Client-Version: " riece-version-number)
-         "-H" "X-Twitter-Client-URL: http://riece.nongnu.org/twitter.xml"
+;;       "-H" "X-Twitter-Client: Riece"
+;;       "-H" (concat "X-Twitter-Client-Version: " riece-version-number)
+;;       "-H" "X-Twitter-Client-URL: http://riece.nongnu.org/twitter.xml"
          "-u" riece-twitter-credential
-         "-d" "source=riece"
+;;       "-d" "source=riece"
          "-d" (concat "status="
                       (riece-twitter-escape-string
                        (encode-coding-string status 'utf-8)))