トップページunix
1001コメント304KB

Navi2ch for Emacs (Part 12)

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。NGNG
Emacsen で動く 2ch 用ブラウザ、Navi2ch スレッド Part 12 です。

* Navi2ch Project Home Page
http://navi2ch.sourceforge.net/

* よくある質問とその答え
http://navi2ch.sourceforge.net/doc/navi2ch/FAQ.html

* 前スレ Navi2ch for Emacs (Part 11)
http://pc.2ch.net/test/read.cgi/unix/1065246418/

* テストは以下で。このスレでテストするのはやめてちょ。
運用情報板 http://qb.2ch.net/operate/ の書き込みテストスレ
navi2chテスト板 http://jbbs.shitaraba.com/computer/2452/

過去スレなどは >>2-10 あたり。
0082名無しさん@お腹いっぱい。NGNG
mami
0083名無しさん@お腹いっぱい。NGNG
>>81
I
0084名無しさん@お腹いっぱい。NGNG
>>81 マニュアルくらいちゃんと読みましょう。
やり方は >>82
0085名無しさん@お腹いっぱい。NGNG
>>84
は?
0086名無しさん@お腹いっぱい。NGNG
>>84
ワロタ
0087名無しさん@お腹いっぱい。NGNG
iだと選択したスレッドだけしかダウンロードできませんよね?
ブックマークに入れてあるスレッドの全ての情報がほしいんです。
できますか?
0088名無しさん@お腹いっぱい。NGNG
>>87
だからブックマークモードで 'I' (大文字) を入力してみて
0089名無しさん@お腹いっぱい。NGNG
>>87
>>82 >>83
0090名無しさん@お腹いっぱい。NGNG
ブックマークモードにしないでIを実行してみたら・・・・
慌ててプロセスを殺しました。

アドバイスありがとうございました。
でも板をまたがることはできないのでしょうか?
0091名無しさん@お腹いっぱい。NGNG
? c a m a m i
0092名無しさん@お腹いっぱい。NGNG
>>90
グローバルブックマークに入れとけ。
0093名無しさん@お腹いっぱい。NGNG
>>90
> 慌ててプロセスを殺しました。
C-g でいいのでは。
M-x help-with-tutorial やっとけ。
0094名無しさん@お腹いっぱい。NGNG
勉強になりました。
0095名無しさん@お腹いっぱい。NGNG
navi2ch-bm-fetch-maybe-new-articles をしすぎて、キャッシュファイルの量が
大きくなりすぎているんだけど、
例えば、「履歴」に残っている (既読の) article 以外のキャッシュを全部消す、
手っ取り早い方法って、誰か考えてないですか?
0096名無しさん@お腹いっぱい。NGNG
g hist m a m A hoge ? o a m a m R
0097名無しさん@お腹いっぱい。NGNG
e とか M-e じゃだめなのかね
009895NGNG
>>96
オ〜ッ、すばやい答えをどうも。

でも、上の操作を頭の中でトレースしたけど、
? の次は o ではなく、c ですね。

>>97
そうすると、どうなるんですか?
navi2ch-article-textize-article よく知らないので
0099名無しさん@お腹いっぱい。NGNG
>>98
板モードで e だよ
010099NGNG
リストモードだった…_| ̄|○
010195NGNG
>>99
既読のキャッシュは全部残したいから、navi2ch-list-expire ではその望みがか
なえられそうにないですね。 (動作仕様を具体的に知らないので、もしかしたら
できるのかも知れないですが。)

あと、>>96
g hist m a m A hoge ? c a m a m R
の方法でも、考えたら、すでにアクセスできなくっている article のキャッシュ
まで消してしまうから、実行できないです。

なんとか、未読のキャッシュのみ削除できないものかなぁ...
0102名無しさん@お腹いっぱい。NGNG
そこまで細かい条件で expire したいなら自分でコード書けば?
0103名無しさん@お腹いっぱい。NGNG
>>101
未読ってナニを指してる?
010495NGNG
>>103
navi2ch-bm-fetch-maybe-new-articles で板一覧の全スレを fetch してしまっ
ても、一度も見てないスレのキャッシュ (← これが未読のキャッシュ) がたまっ
ている。これが嫌なので、消したい、ということでございまする。

>>102
その元気がちょっとないので... トホホッ
それとすでに同じことを考えてる人がいて、既出かと思ったもので。
0105名無しさん@お腹いっぱい。NGNG
navi2chって2chのシステムが変更になったときどうなるのですか?
知らず知らずに人が減ったなぁ・・・と古い掲示板を一人で見続けているなんて事にはなりませんか?
0106名無しさん@お腹いっぱい。NGNG
>>104
?caSs で U マークのスレをリージョン指定して mrmR じゃ駄目なんかな。
010795NGNG
>>106
それができればいいんですけど、
U マークのスレが、これまで一度も見ていないスレのキャッシュとは限らない、
ですよね。
C マークの後、navi2ch-bm-fetch-maybe-new-articles すると、U マークに変更
されることがあるはずですし。
0108名無しさん@お腹いっぱい。NGNG
見たことが無いってことは、スレの number プロパティがnil ってことだろ。
そんな条件での expire / 検索は無いから、自分でなんとかするか黙ってるか
のどっちかにしろって。
0109名無しさん@お腹いっぱい。NGNG
.filter ってファイルがあるかないかで
判定するようにすればいいんじゃないか?
違ってたらごめんなさい。

lisp の書き方知らないけど、find とか grep とか diff とかで
シェルスクリプトつくればできそうな気がする。
0110名無しさん@お腹いっぱい。NGNG
>>105
板移転の話なら >>3 >>36 あたりを参考に。
もっとデカいシステム変更の話なら、
まーなんとかするんじゃねーの?
0111ヽ(´ー`)ノNGNG
最新のリリース版入れて安心してたら、例のブラクラに引っかかった_| ̄|○
0112名無しさん@お腹いっぱい。NGNG
例のブラクラってなんだ?
0113ヽ(´ー`)ノNGNG
具体的にはコレ。
http://pc.2ch.net/test/read.cgi/unix/1074758741/56

しょんぼりしながら snapshot 入れますた(´・ω・`)
0114名無しさん@お腹いっぱい。NGNG
邦楽板が見れなくなった。
(-_-)ウツダ
0115名無しさん@お腹いっぱい。NGNG
お、確かに。法学板移転してるのかな?
0116名無しさん@お腹いっぱい。NGNG
あちこちの板が大移動してるようだな。
0117名無しさん@お腹いっぱい。NGNG
navi2chと関係ないだろが < 移転
各自ふつーのブラウザで 2chのトップから辿って
etc.txtで対処するなりしろよ。
0118名無しさん@お腹いっぱい。NGNG
>>117
見てて思うけど、お前の話しには発展性が見られないな。

それから 「...しろよ」って言い方は止めたほうがいいんでは。
作者様ならまだ許せるが。
0119118NGNG
作者って、navi2ch のな。
0120名無しさん@お腹いっぱい。NGNG
konosureha kitigaigaooi
0121名無しさん@お腹いっぱい。NGNG
>>117は天地創造の神
0122名無しさん@お腹いっぱい。NGNG
最近、ヘッドラインっていう板ができたけど、自動でこの板にあるスレを定期
的に取得する関数を作ったんですが、欲しい人いますか?
30分〜1時間間隔ぐらいで自動取得しとけば、過去のヘッドラインを辿れるよ
うになると思って作りました。まぁ、片手間で作ったものなので全然洗練されて
いないから、幾分長めの関数だけど。
0123名無しさん@お腹いっぱい。NGNG
コードの洗練は後でやればいいことだから、
とりあえずどんなのか体感してもらっては?
0124122NGNG
>>123
んじゃ、とりあえず載せてみます。

navi2ch が起動してなくても、
M-x my-navi2ch-headline-auto-check
で開始します。スレ自動取得後は、sleep-for するので、
解除したいときには C-g で。

(defun my-navi2ch-headline-auto-check ()
(interactive)
(unless (featurep 'navi2ch) (navi2ch))
(let ((target-board "bbynews")
(sleeping-minute 30))
(my-navi2ch-list-goto-board target-board)
(while t
(my-navi2ch-headline-check))))

;; 次に続く...
0125122NGNG
>>124 の続き

(defun my-navi2ch-headline-check ()
(sit-for 0)
(navi2ch-bm-mark-by-query "^[ ]*[0-9]+[ ][ %][^CU]")
(sit-for 0)
(navi2ch-bm-fetch-mark-article)
(message
(concat "Finishing checking at "
(format-time-string "%p%l:%M:%S" (current-time))
". Re-checking after " sleeping-minute " minute(s) ..." ))
(redraw-frame (selected-frame))
(sit-for 0)
(sleep-for (* sleeping-minute 60))
(navi2ch-board-sync))

;; 次に続く...
0126122NGNG
>>125 の続き

;; 以下、navi2ch-list-goto-board からのパクリ
(defun my-navi2ch-list-goto-board (target-board)
;;(interactive)
(let (alist board)
(setq alist (mapcar (lambda (x) (cons (cdr (assq 'id x)) x))
navi2ch-list-board-name-list))
(save-window-excursion
(setq board (cdr (assoc
;;(completing-read
;; (concat "board name"
;; (when default
;; (format "(%s)" (cdr (assq 'id default))))
;; ": ")
;; alist nil t)
target-board
alist))))
;;(setq board (or board
;; (assoc (cdr (assq 'id default)) alist)))
(when board
(when (eq (navi2ch-get-major-mode navi2ch-board-buffer-name)
'navi2ch-board-mode)
(navi2ch-board-save-info))
(navi2ch-list-select-board board))))

;; おしまい
0127名無しさん@お腹いっぱい。NGNG
開くスレの数の制限を、init.el に
(setq navi2ch-article-auto-expunge t)
(setq navi2ch-article-max-buffers 10)
と書いてやってるのですが、
この navi2ch-article-max-buffers の数字を一時的に変えることってできますか?

bookmark したスレのフィルター処理をまとめてしたくて、
m a m . とやったりする時に、1 とかに減らしたいんですけど。
init.el 書き換えて、navi2ch 起動しなおした方がいいですか?
0128名無しさん@お腹いっぱい。NGNG
>>127
*scratch* バッファで
(setq navi2ch-article-max-buffers 1) C-j とかじゃ駄目ですか?

もしくはこんなので m . の時だけ
navi2ch-article-max-buffers を 1 にするとか。(検証はしてません)

(defun my-navi2ch-bm-display-mark-article ()
(interactive)
(let ((navi2ch-article-max-buffers 1))
(navi2ch-bm-display-mark-article)))
0129名無しさん@お腹いっぱい。NGNG
>>127
ちなみになんで減らしたいの? 処理が早くなるのかな。
0130127NGNG
>>128 ありがとうございました。
my-navi2ch-bm-display-mark-article できました。
m a のあとで M-x my-navi2ch-bm-display-mark-article ですね。

数字変えて、名前変えた物も defun で用意して切替えられるようにしてみました。
# 数字を自分で入れられるようにできると良さそうですが。。lisp 勉強してみます。

*scratch* バッファの方でもやってみたけど、
ちゃんと動いてるのかどうか分かりません。一度できたような気がするのですが。
navi2ch-article-expunge-buffers の使い方とかも調べてみます。

>>129
! でいろいろ NG ワード増やしてたらだいぶ時間がかかるようになってしまって、
(bookmark をいくつか分けてあるのですが、)180 個くらいあるところで、
m a m . やって、だんだん遅くなって、下のようなメッセージが出て emacs が固まりました。
それで、過去スレ part 4 で制限できることを知って、
でも普段はそれほど必要ないのでかえられたらいいなと。
 bookmark ももっとちゃんと分類しなきゃなんですけど。

Warning: memory in use exceeds lisp pointer size
Killing some buffers may delay running out of memory.
However, certainly by the time you receive the 95% warning,
you should clean up, kill this Emacs, and start a new one.
0131128NGNG
>>130
> # 数字を自分で入れられるようにできると良さそうですが。。lisp 勉強してみます。
勉強中だと思いますがこんなのどうでしょう。

(defun my-navi2ch-bm-display-mark-article (&optional num)
(interactive "p")
(let ((navi2ch-article-max-buffers num))
(navi2ch-bm-display-mark-article)))
(define-key navi2ch-bm-mode-map "m." 'my-navi2ch-bm-display-mark-article)

C-u 数字 m . で navi2ch-bm-display-mark-article の値を変更できます。
m . だけなら navi2ch-bm-display-mark-article は 1 です。
0132名無しさん@お腹いっぱい。NGNG
書き込む時に空白を&nbsp;に変換してくれる、ってことできますか?
0133名無しさん@お腹いっぱい。NGNG
>>132
navi2ch-message-before-send-hook あたりでどうよ。
0134名無しさん@お腹いっぱい。NGNG
過去にその手のコードが貼られていたな
0135名無しさん@お腹いっぱい。NGNG
頭の悪い発言を色違いで表示できたら面白くないですか?
0136名無しさん@お腹いっぱい。NGNG
135が真っ赤に表示されました。
0137名無しさん@お腹いっぱい。NGNG
自分の出した記事を全部ログにとっておくことはできませんか?
info を見た限りでは出来なそうですけど。
0138名無しさん@お腹いっぱい。NGNG
>>137
出した記事って何ですか?
履歴? それとも 送信控え?
0139127NGNG
>>131 レスありがとうございます。短いコードだけどいろいろ分かった気がします。

Emacs Lisp の説明のサイトとかみながらいじってたらこんなのできました。
テスト,添削お願いします。

(defun my-navi2ch-change-article-max-buffers (numbers)
"navi2ch-article-max-buffers を変更し、越えていたら閉じる。"
(interactive "p")
(setq navi2ch-article-max-buffers numbers)
(navi2ch-article-expunge-buffers)
)
0140名無しさん@お腹いっぱい。NGNG
>>1-5 ってアンカーでエラー出るの漏れだけ?前はちゃんといけてた気がするんだが…

Emacs21,cvs 最新でつ。
0141名無しさん@お腹いっぱい。NGNG
>>140
w3m-async で emacs-w3m を使っているのに 200 レス。
0142名無しさん@お腹いっぱい。NGNG
>>141
もちっとヒントキボンヌ
0143名無しさん@お腹いっぱい。NGNG
書き込みで「もうちょっと待ってください」等のエラーが出た場合、message
ウィンドウが消えてしまいますが、どうやって復活させればいいんでしょうか?
0144名無しさん@お腹いっぱい。NGNG
C-c C-i とかいう話?
0145名無しさん@お腹いっぱい。NGNG
>>140
俺は無問題。どんなエラーが出るか書くべし。
0146名無しさん@お腹いっぱい。NGNG
>>143
FAQ 読んどけ。
0147名無しさん@お腹いっぱい。NGNG
navi2ch-logo.elを使ってみたいのですがどうやって
導入すればよいのかわかりません。
とりあえず~/.navi2chに放り込んでinit.elいじればよいのでしょうが
イマイチわからないのでご教示願います。クダ質ですいません。
0148147NGNG
と環境も書かずにすいません。emacs21でCDE上で動かしてます。
で,過去ログ漁っていると
(require 'navi2ch-logo)
(add-hook 'navi2ch-hook 'navi2ch-logo-init)
だけで逝けると書いてありますがnavi2ch-logoが見つからないと
怒られます。これはどこにあるのでしょうか?
ググっても見つかりませんでした・・・
0149名無しさん@お腹いっぱい。NGNG
インストールしろよ…
0150147NGNG
いや。navi2ch-logoってのがググっても見あたらないのです。
navi2ch-logo.elとかnavi2ch-logo.xpmってのはあるんですけど。
navi2ch-logo.elをrenameしてみたりしたのですが
それじゃ動きませんでした。
0151名無しさん@お腹いっぱい。NGNG
とりあえず>147は一般的なelispアプリケーションについて最低限の知識を得ることを薦める。
今の無知なままグダグダ書かれてもスレ汚しなだけ。
0152名無しさん@お腹いっぱい。NGNG
>>150
それはだね、navi2ch.el が load-path のとおった所に置かれてないから。
~/.navi2ch の下に置いてんだろ。
そこに load-path をとおすか(普通やらない)、load-path のとおった場所に
置きなさい。
0153147NGNG
elispとは何か。から調べてみます。
load-pathを調べて出てきたところにnavi2ch-logo.elを突っ込んだら
怒られなくなりました。
今度はスレを開こうとするとcovertが見つからないと出ます。
外部プログラムとはいうもののconvert .tar.gz XPM とかキーワード煎れても
全く見つかりません。あまりにもクダ質ですがどこにあるかご教示願います。
あるいは
0154名無しさん@お腹いっぱい。NGNG
>>153 ImageMagick をインスコしる!!
0155名無しさん@お腹いっぱい。NGNG
>154
もうやめとけって釣りだろ釣り
0156名無しさん@お腹いっぱい。NGNG
ところで 1.7.1 と cvs との機能差ってどれぐらいあるの?
(´-`)。oO(やはり cvs を追ったほうが良いのかのぅ…
0157名無しさん@お腹いっぱい。NGNG
↓らしいですよ。

Meadowについて語るスレ その4

From: [54] 名無しさん@お腹いっぱい。 <sage>
Date: 04/02/25 18:39 ID:JJn6VohN

>>34
> Meadow2.00pre1でnavi2chを使っています。

beta2 でもなるから、navi2ch か BBS の問題では。
0158名無しさん@お腹いっぱい。NGNG
Emacs 21.3 on FreeBSD、Meadow 1.15 だと平気だけどね
0159名無しさん@お腹いっぱい。NGNG
メッセージモードで書き込みのプレビューをaa-viewで見ることはできますか?
0160名無しさん@お腹いっぱい。NGNG
>>159
(setq navi2ch-mona-on-message-mode t) じゃ駄目か?
0161名無しさん@お腹いっぱい。NGNG
次スレに移行する時とかに navi2ch-mona-enable-article-list を
イチイチ設定するの面倒なんだけど、なんかイイ方法ない?
0162名無しさん@お腹いっぱい。NGNG
>>161 navi2ch-tugisure-hook を使う
0163名無しさん@お腹いっぱい。NGNG
>>161
navi2ch-mona.el:1.33 以降で
(add-to-list 'navi2ch-mona-disable-list
(lambda ()
(let ((case-fold-search t)
(subject (cdr (assq 'subject
navi2ch-article-current-article))))
(and (stringp subject)
(string-match "navi2ch" subject)))))
みたいなことをできるようにしてみた。
0164名無しさん@お腹いっぱい。NGNG
さっきcoしてきたやつ、configureでエラーがでまつ。
./configure: line 1137: syntax error near unexpected token `link-lisp,'
./configure: line 1137: ` AC_CONFIG_COMMANDS(link-lisp,'
0165名無しさん@お腹いっぱい。NGNG
>>164
俺は出ないよ.Emacs 21.3.50 を使ってる.
0166名無しさん@お腹いっぱい。NGNG
AC_CONFIG_COMMANDS なんてのが残ってるってことは、自分で autoconf
したのかな。
0167名無しさん@お腹いっぱい。NGNG
>>166
自分で作ったらしいファイルを消して
coし直しでOKでした。ありがとうございました。
0168名無しさん@お腹いっぱい。NGNG
まちBBS関東 を見ているのですが、次スレの誘導とかで、
下のように kanto.machi.to ではなく 203.192.159.253 と書かれていると、
navi2ch で開けず、ブラウザーで開くようになってしまうのですが、
どこかいじると開くことができるようになりますか?
たとえば、こんな URL
http://kanto.machi.to/bbs/read.pl?BBS=kanto&KEY=1038315936&LAST=50
http://203.192.159.253/bbs/read.pl?BBS=kanto&KEY=1038315936&LAST=50

それともうひとつ、フィルター処理なんですけど、
h キーで hide と そうじゃないものを切替える時に、
毎回フィルター処理が実行されるのですが、そういうものなのでしょうか。
d で hide を解除したレスが h を押すと再びフィルター処理で隠されてしまう。
! で登録したものじゃなくて自分で d で消したレスは平気なのですが。
0169名無しさん@お腹いっぱい。NGNG
パッと思い付くのは
(setq navi2ch-article-filter-list
'((lambda () (replace-string "http://203.192.159.253/" "http://kanto.machi.to/"))))
などとして、記事にフィルタをかけるとか。

後半に関しては、自分も面倒だと思うことがあるけど、どのみち引っ掛かっている
フィルタ条件を調整する必要があるだろうし。以前、この辺りの挙動を変える
オプションがあったような。統合されたときになくなったのかな。

単に hide されたレスを見たいだけのときは、F で一時的に filter を切ってから
行き来することがあるけどね。
0170名無しさん@お腹いっぱい。NGNG
こんなんでどうかな。

(defvar my-navi2ch-translate-url-regexp-list
'(("\\`http://203.192.159.253/" . "http://kanto.machi.to/")))

(defadvice navi2ch-article-select-current-link-url
(before my-translate-url-navi2ch-article-select-current-link-url activate)
(dolist (elt my-navi2ch-translate-url-regexp-list)
(catch :break
(when (string-match (car elt) url)
(setq url (replace-match (cdr elt) nil nil url))
(throw :break nil)))))
0171名無しさん@お腹いっぱい。NGNG
>>170
問題は my-navi2ch-translate-url-regexp-list をどうやって管理するかだな。
0172168NGNG
>>169 >>170-171 ありがとうございました。
一個だけの状態だと、>>169 だと TAB で URL のところに移動したときに、
板の名前を表示できたので便利に感じました。

数字のままで表示されていたほうがいいのか、書き換えられたほうがいいのか、
ちょっと分かりませんが。

> フィルタ処理
フィルタ処理の動作全体を把握しないとダメですかね。
素直に F で切ったほうが楽な気がしてきたけど、のんびり読んでみます。
0173名無しさん@お腹いっぱい。NGNG
既出かも知れませんが、メニュー画面で例えば "k" を押すと今日の日付のファイル
を検索するようにするにはどうすれば良いでしょうか? 押すキーは "k" でなくても
何でもいいのですし、「今日の日付のファイル」でなく「今日の日付」の検索でも
構いません。要は今日書いたメモを素早くリストしたいということです。
0174173NGNG
すいません。誤爆です。 はづかし。。。
0175名無しさん@お腹いっぱい。NGNG
C-Dでレス消しちゃったんですけど、どうやったらまた見れるようになります?
0176名無しさん@お腹いっぱい。NGNG
h d
0177extraNGNG
>>168
> d で hide を解除したレスが h を押すと再びフィルター処理で隠されてしまう。
d ではなく C-u d で解除すると、再びフィルタされないようになります。

>>169
> フィルタ条件を調整する必要があるだろうし。以前、この辺りの挙動を変える
> オプションがあったような。統合されたときになくなったのかな。
この辺はどうしようか迷ったんですが、cancel は結局繁雑になるので廃止し
ました。その代わりが上記 C-u d という形になっています。
0178名無しさん@お腹いっぱい。NGNG
別個に保存しておいたdatを見るキーバインドって何だっけ(忘れた)
0179名無しさん@お腹いっぱい。NGNG
C-c C-f
0180名無しさん@お腹いっぱい。NGNG
Meadow2.00b2+navi2ch cvs + spamfilter + navi2ch-spamfilter
でtokenizerにchasenを使ってみようと思ったのですが、
'chasen-sync-tokenize-stringの実行時にオプションが渡されなくてこんなエラーが出ます。

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
call-process("chasen" nil nil nil nil "-o" "c:/home/tmp/chasen-tmp-3244z4U.cha" "c:/home/tmp/chasen-tmp-3244z4U")

chasen.elの'execute-chasen-program部分に直接オプションを書くとうまくいったのですが、
'chasen-default-bindマクロがうまく動いていないみたいです。
elisp環境に何か問題があるのでしょうか?
0181名無しさん@お腹いっぱい。NGNG
navi2chでhttp://nych.infoは読めないな?

■ このスレッドは過去ログ倉庫に格納されています