Navi2ch for Emacs (Part 18)

>>901
> elispが良くわかっていないので~/.navi2ch/init.elで設定する場合どんな風に書くべきなのか見当がつかない。
> 誰かまとめてくれると俺だけでなく俺と似たような無知な連中も助かると思うんだが。
>>913
> init.elでやりたきゃ、other-headerにUser-Agentを追加するadviceをかければいい。
> コピペして再定義より変更にロバスト。
>>915
> ;; korede ikeru?
> (defadvice navi2ch-net-send-request (around navi2ch-net-send-request-ad activate)
> "書き込み時にもUAを明示しないとfusianasan"
> (or (assoc "User-Agent" other-header)
> (add-to-list 'other-header (cons "User-Agent" navi2ch-net-user-agent)))
> ad-do-it)
>>925
> パッチ
> ttp://sourceforge.net/tracker/index.php?func=detail&aid=2105538&group_id=39552&atid=435774
>>954
> --- navi2ch-net.el.~1.114.~ 2008-08-06 20:24:56.000000000 +0900
> +++ navi2ch-net.el 2008-09-10 23:56:04.543971438 +0900
> @@ -234,6 +234,8 @@
> (message "%ssending request..." (current-message))
> (set-process-coding-system proc 'binary 'binary)
> (set-process-sentinel proc 'ignore) ; exited abnormary を出さなくする
> + (or (assoc "User-Agent" other-header)
> + (add-to-list 'other-header (cons "User-Agent" navi2ch-net-user-agent)))
> (process-send-string
> proc
> (format (concat
>
> とりあえず、このパッチはこっちに書いといた方がいいじゃない？