@peccul is peccu

(love peccu '(emacs lisp cat outdoor bicycle mac linux coffee))

twit.elのRTでin_reply_toが付いている件.およびRTのフォーマット

twit.elのRTでin_reply_toが付いているよ.との報告を受けて,さっそくin_reply_toを消した.

ついてると結局reply先の人もフォローしとかないとTLに現れないから,RT(みんなに見せたいつぶやき)の意味がない.

たとえばpecculが「なるほど RT @foobar: ほにゃらら」とRTすると,@pecculをフォローしている全員のTL(タイムライン)にこのつぶやきが表示されるはずです.

でもtwit.el(ver. 0.3.5)でRTした「なるほど RT @foobar: ほにゃらら」は@pecculと@foobarの2人ともフォローしてる人にしかこのつぶやきが見えないのです.こりゃーこまった.

というわけでアドバイス書いちゃう.

ちなみにデフォルトだと「RT @foo: waka waka waka || 」というRTのフォーマットなので,「RT @foo: waka waka waka」と変えました.

ほい.

追記:RTの前に半角スペースを入れました

;; change RT format and delete parent-id
;; begins a post with " RT @foo: waka waka waka"
(defadvice twit-post-retweet
  (around around-twit-post-retweet)
  (let* ((reply-to (twit-get-text-property 'twit-user))
         ;; (parent-id (twit-get-text-property 'twit-id))
         (retweet-text (twit-get-text-property 'twit-message))
         (post (twit-query-for-post
                (concat "Retweeting " reply-to) ;reply-toはユーザー名!?そもそもreply-toなのか??
                (concat " RT @" reply-to ": " retweet-text))))
    (if (> (length post) 140)
        (error twit-too-long-msg)
        (twit-post-status twit-update-url post
                          ;; parent-id  ;in_reply_toにするとRTの意味がない
                          ))))
(ad-activate 'twit-post-retweet)