| レス数が950を超えています。1000を超えると表示できなくなるよ。 |
Navigator for 2ch
[455:(not 1) (2001/03/22(木) 05:40)]
・list-mode で navi2ch カテゴリとその他カテゴリの追加
・表示しているスレの一覧モード(articles-mode)の追加
・'CVU' が付いてるのを mark できるように
・mona font が使えるように
・navi2ch-article-arrange-message-functions を
navi2ch-article-arrange-message-hook に。
です。
http://www.geocities.co.jp/SiliconValley-Oakland/7673/navi2ch-010322.tar.gz
navi2ch-list-etc-category-alist で board.txt に書かれていない板を指定できる
ようにしてみました。例えば cocoaゴミ箱なら以下のような感じです。
(setq navi2ch-list-etc-category-alist
'(((name . \"cocoaゴミ箱\")
(uri . \"http://cocoa.2ch.net/cocoatr/\")
(id . \"cocoatr\"))))
表示スレ一覧と bookmark は 今度からは list-mode から選んで下さい('B' はやめ
た)。'g' で移動するときは 'articles' と 'bookmark' です。
board-mode で 'mm' を押した後に 'CVU' のどれかを押すとそのマークが付いてい
るスレを mark します。'mi' した後とかに使うと便利かもです。
>>446
mona font のコードを使わせてもらいました。どうもです。
設定は、.emacs で (require 'navi2ch) の前か後に
(require 'navi2ch-mona)
(setq navi2ch-mona-enable-board-list '("mona")
navi2ch-mona-pack-space-p t)
(add-hook 'navi2ch-article-arrange-message-functions
'navi2ch-mona-arrange-message)
とかしてやって下さい。
> ですよね？でも実際には out of range になるです。
> ちょっと詳しくはわからないのですが。
結局 beg end で指定じゃなくって narrowing するようにしちゃいました。
なので navi2ch-article-arrange-message-functions は廃止です。
もしこの hook を使ってる人がいたら navi2ch-article-arrange-message-hook に
ひっかけるようにして、ひっかける関数も buffer 全体に動作するものに変えてく
ださい。
> こんな具合です。
> http://widech.virtualave.net/upload/img-box/img20010319015727.gif
すげぇ。AA が見れてる。感動。
Emacs21 でも設定次第で見れるのかな？
>>447
どうもです。直しときました。
>>450
> 通常の状態で使うと，string-as-unibyte 周りでエラーが出ます。
XEmacs には string-as-unibyte が無かったらしいんで、apel から同じようなのを
拾ってきました。多分ここはこれで大丈夫なはず。
;; っていうか始めから素直に apel 使ってればよかったかも。今更遅いか。
>>451
> ただこれでも，二分割画面(上 Board 下 Article)でスレッドを選
> んだ時に，xemacs が core を吐いて倒れます。Lisp backtrace は
> 以下のような感じ。
これはちょっと分かんないです。
elc ファイルを消してからもう一度 backtrace を取ってもらえますか？
>>452
> 行頭の半角スペースは無視
> 二つ以上の半角スペースは一つに変換
やってみました。
navi2ch-mona-pack-space-p を t にして下さい。
>>454
> nav2chで見ていると。splitに時間がかかるようになってきた。
どれくらいかかります？
range が 1 100 くらいだったら俺のとこだと大して遅くは感じないんですけど。
しゃれにならんくらい遅いんだったら part2 作りますか。
;; Emacs は遅いものだとあきらめるのも一つの方法かもしれないです(笑)。
[456:(not 1) (2001/03/22(木) 05:47)]
ああ、そうだ。
mona font の辺りは全然テストできてないんで(一応違う face 使ってやってみだけ
ど)動かない可能性大です。
でわ。
[457:ロッソ (2001/03/22(木) 16:09)]
〃
（中」中）ノ ド初心者ですいませんが、たとえば２００レスあるスレッドを表示させると、１〜１００レスと２００個目しか表示されないんですが...
[458:名無しさん＠お腹いっぱい。 (2001/03/22(木) 16:18)]
>>457
'r'で選択肢がでますよ
[459:ロッソ (2001/03/22(木) 16:56)]
>>458
> 'r'で選択肢がでますよ
〃
（中」中）ノ あ、本当だ！ わーい！！ さんきう〜
[460:ロッソ＠Ｅｍａｃｓ (2001/03/23(金) 01:09)]
〃
（中」中）ノ ちょっと！奥さん！！ これ、すごくいいじゃない！ ちょっと！！
[461:名無しさん＠Ｅｍａｃｓ (2001/03/23(金) 03:49)]
コレ、いいですね〜!! もう手離せません!!
[462:431 (2001/03/23(金) 09:38)]
> mona font のコードを使わせてもらいました。どうもです。
おおぉ、まさか取り込んでもらえるとは!
こちらこそどうもです。すげ〜感動ッス。
> mona font の辺りは全然テストできてないんで(一応違う
> face 使ってやってみだけど)動かない可能性大です。
一応、直してみました。
--- navi2ch-mona.el.orig Thu Mar 22 04:50:54 2001
+++ navi2ch-mona.el Fri Mar 23 08:59:29 2001
@@ -25,7 +25,7 @@
;;; Commentary:
;; (require 'navi2ch-mona)
-;; (add-hook 'navi2ch-article-arrange-message-functions
+;; (add-hook 'navi2ch-article-arrange-message-hook
;; 'navi2ch-mona-arrange-message)
;; すればおっけ。 @@ -43,7 +43,7 @@
;; mona 用の face を作成。
(make-face 'navi2ch-mona-face)
-(set-face-property 'mona-face
+(set-face-property 'navi2ch-mona-face
'font "-mona-gothic-medium-r-*--16-*-p-*")
;; Link 以外を mona-face にする
@@ -73,8 +73,10 @@
(when (or (member id navi2ch-mona-enable-board-list)
(and (not (member id navi2ch-mona-disable-board-list))
navi2ch-mona-enable))
- (navi2ch-put-mona-face beg end))
+ (navi2ch-mona-put-face))
(when navi2ch-mona-pack-space-p
(navi2ch-mona-pack-space))))
+
+(provide 'navi2ch-mona)
;;; navi2ch-mona.el ends here
[463:ロッソ＠Ｅｍａｃｓ (2001/03/23(金) 11:50)]
〃
（中」中）ノ バイク板が見えないです…
[464:名無しさん＠お腹いっぱい。 (2001/03/23(金) 12:36)]
見えてるよ。
read.cgi ver5.26+ (01/10/21-)