twitter-modeにInstapaper連携を追加

xyzzy twitter

今日も夜のジョナサンで自主練です。

今日のお題「xyzzyのtwitter-modeからInstapaper連携してみる」Instapaperについてはいづれ書きますが、仕事中にこそこそtwitter-modeでツイッターしてる人には非常に相性がいいサービスで、気になるURLを片っ端から保存してあとで見る用途に向いています。つぶやきの中に気になるURLがあったら、twitter-modeから直でInstapaperに登録出来るようにします。

http://www.instapaper.com/ Instapaper


まず試験用のつぶやき。 つぶやきの中のhttp://www.google.co.jp/をInstapaperに追加します。

ここで「I」を押す

つぶやきからURLを切り取ってタイトルにして編集

Instapaperに投稿する。


InstapaperのAPI仕様は次のページ http://www.instapaper.com/api APIは超単純でGETでもPOSTでもとにかくパラメータつけて要求投げれば大丈夫です。

(defun  instapaper-add-u (url &key title )
  (setq url ( format nil "https://www.instapaper.com/api/add?url=~A&username=yyyyyyyy&password=xxxxxxxxx" (si:www-url-encode url) ))
  (if title
      (setq url  (concat url "&title=" (si:www-url-encode (convert-encoding-from-internal *encoding-utf8n* title)))))
  (open-web  url   ))

ざっくり作るとこんな感じ。めんどくさいのでopen-webでブラウザ経由で要求投げてます。