EmacsCE+navi2chで快適2chアクセス

このエントリーをはてなブックマークに追加
105(not 1)
で、解決策(多分)です。
以下の navi2ch-call-process-region という関数を定義して、
(defun navi2ch-call-process-region (start end program
&optional delete destination display
&rest args)
(let ((tmpfile (expand-file-name (concat (make-temp-name "navi2ch"))
(getenv "TEMP")))
(str (buffer-substring start end)))
(and delete (delete-region start end))
(with-temp-file tmpfile
(insert str))
(prog1
(apply 'call-process program tmpfile destination display args)
(delete-file tmpfile))))

navi2ch-net-gunzip-program を "zcat" に設定して、
(setq navi2ch-net-gunzip-program "zcat")

navi2ch-net-get-content の call-process-region の部分を
navi2ch-call-process-region に変更してみて下さい。
(apply 'navi2ch-call-process-region
(point-min) (point-max)
navi2ch-net-gunzip-program t t nil
navi2ch-net-gunzip-args)

これでうまくいったりしませんか?