2ch RSS配信

http://rss.s2ch.net/

2chのスレをRSSで配信してくれる2ch公認サービス…なんだけど改行がなくなってるし、スレのリンクをクリックしたらまたfeedに飛ばされるし、UTF-8じゃなくてShift_JISだし、dateエントリすらないし、そのままだといまいち使いづらい。
まぁXMLなんだからスクリプト書いてhackすりゃええんやけど…
俺はrawdogでRSS→HTML変換してw3mで読んでいる。

• rawdogはUTF-8にしか対応していないのでローカルなCGI proxyでUTF-8に変換した。
• navi2chから~/.rawdog/configへfeedを登録できるようにした。
• XMLはまだ加工していない。

いろいろと俺環境に依存しているから、elispの概略だけ。

(defun navi2ch-rss-url (article-url)
  (replace-regexp-in-string "^http://" "http://rss.s2ch.net/test.cgi/-/"
    (replace-regexp-in-string "/test/read.cgi" "" article-url)))
(defun navi2ch-article-current-url ()
  (let ((board navi2ch-article-current-board)
        (article navi2ch-article-current-article))
    (navi2ch-article-to-url board article)))
(defun navi2ch-article-current-title ()
  (cdr (assq 'subject navi2ch-article-current-article)))