(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)))