Navigator for 2ch

レス数が950を超えています。1000を超えると表示できなくなるよ。

Navigator for 2ch

[534:名無しさん＠Ｅｍａｃｓ (2001/04/18(水) 15:07)]
>>533
browse-url-netscape-program を
mozilla にすればいいんじゃないかな。

[535:名無しさん＠Ｅｍａｃｓ (2001/04/18(水) 17:19)]
>>533
おいらは、w3m.el を入れて
(setq browse-url-browser-function 'w3m-browse-url)

けっこう、幸せ。

[536:(not 1) (2001/04/18(水) 23:00)]
ちょいtestすまんです。

[537:(not 1) (2001/04/18(水) 23:02)]
あれ、書けてる。長すぎたのかな。もっかい。

・global bookmark を整理できるようにしてみた。
・URL 指定でスレを開けるようにした。
・一応過去ログ対応。
・expire 機能(一定日数以上たったスレを消す)を付けてみた。
・README にキーバインドを載せた。
・他にもあるかも。

です。

http://www.geocities.co.jp/SiliconValley-Oakland/7673/navi2ch-010418.tar.gz

むっちゃ久しぶりです。一ヶ月ぶりくらいかな。
でも、またしばらく反応ないかもしれないです。すいません。

そんで、

global bookmark の整理は C-k と C-y で行ないます。
まぁ、やれば判ると思います。やってみて下さい(笑)。

URL 指定は C-cC-u です。一応 dat 形式も cgi 形式も両方とも OK です。
でも板は指定できない気がします。

過去ログは URL を指定したときのみ見ることができます。
あんまりうまい方法が思いつかなかったんで。
他の 2ch reader はどうしてるのかな。

expire 機能は付けてみただけでまだいまいちかもです。
bookmark に指定してるのも問答無用で消しちゃうし。
board mode に入ったときにその板のファイルを expire したいときは
(add-hook 'navi2ch-board-mode-hook 'navi2ch-board-expire)
とかしてあげで下さい。
勿論コマンドで使うときは M-x navi2ch-board-expire です。

あと README にキーバインド載せました 467 さんに感謝です。
でも追加したやつは載っけてなかったりする(面倒臭かったから)。

[538:(not 1) (2001/04/18(水) 23:04)]
やっぱ長すぎるとダメみたい。初めて知った。
;; 2ch reader を作ってるとは思えない発言だな(汗)。
んで、続き。

>>501,502
> M-x describe-mode
やっぱそれで出るやつにも README に載っけたようなのがあった方がいいですか？
でもそれやると新しいキーバインドに追随させ忘れたりするかもしれませんが。

>>507
> find .navi2ch -depth $ -type f -mtime +5 -exec rm {} \; $ , $ -type d -empty -exec rmdir {} \; $
それだと subject.txt とかも消えちゃうと思います。
一応 expire 機能とかいうのを付けたんでそれを使ってみて下さい。

>>511
> 板ごとにデフォルトで挿入する名前を設定するのはできるの？
あ、それそのうちやっときます。ただやり忘れてただけなんで。

>>512,514
> shift 押しながら s でどうでしょう？
確かその機能は、おかしいのを放っておいたままな気がします(汗)。
更新はできるけど、表示で失敗してたような。
;; あと、実はあぼーんのとこもおかしかったりする。

>>515
> (setq inherit-process-coding-system t)
む、どっかでこれを nil に束縛しておいた方がいいのかな。

>>517
> navi2chのすばらしさを知りました。
ありがとです。

> ところでコマンド名のone-/two-/three-painの
> painはpaneの誤りだと思われます。
うぁ、typo です。
でも何となんなくカッコいいのでこのままいきます(笑)。

>>521
> 板を追加するには navi2ch-list-board-name-list に .emacs から追加しちゃっていいの？
navi2ch-list-etc-category-alist
に登録して下さい。>>455 参照。

>>522
> 早く色付けてもらえんかな。
wl と同じかんじでいいですか？
もうちょっとまってて下さいな。

>>523
サンクス！

>>532
> quota残り容量に問題がなければ、emacs自分でinstallすべし。
俺も学校で自分のとこに XEmacs 入れてました。
あと enlightnment とか gimp とか入れてたら管理者から警告来ましたけど(笑)。

[539:(not 1) (2001/04/18(水) 23:06)]
もしかして、おもいっきり長い書きこみではじかれると、
新しい書きこみがないのにスレを age られる？

独り言でした。

[540:名無しさん＠お腹いっぱい。 (2001/04/19(木) 01:52)]
わーい!作者さんだー!
navi2ch のおかげですごく快適です。
ageageage

[541:名無しさん＠お腹いっぱい。 (2001/04/19(木) 05:57)]
XEmacs だと expire がエラーになるっす。

Wrong type argument: stringp, nil

になるっす。

[542:(not 1) (2001/04/19(木) 07:55)]
>>541
> XEmacs だと expire がエラーになるっす。
> Wrong type argument: stringp, nil
うちでも global bookmark とかだとそうなりますね。
普通の板(unix 板とか)でもそうなりますか？
なるのであれば backtrace をお願いします。
;; Wrong type argument になるのはエラー処理をサボってるから :-)

[543:名無しさん＠お腹いっぱい。 (2001/04/19(木) 10:18)]
>>542
.xemacs.el に

(add-hook 'navi2ch-board-mode-hook 'navi2ch-board-expire)

を入れて UNIX 板に入ったときのばっくとれーすれす。

Signaling: (wrong-type-argument stringp nil)
string-match("[^/]$" nil)
(if (string-match "[^/]$" uri) (progn (setq uri ...)))
)
(when (string-match "[^/]$" uri) (setq uri (concat uri "/")))
)
(let ((uri ...)) (when (string-match "[^/]$" uri) (setq uri ...)) (concat uri (cdr ...)))
)
navi2ch-board-get-uri(nil)
(let ((uri ...)) (string-match "http://\$.+\$" uri) (setq uri (match-string 1 uri)) (when (string-match ".+kako/" uri) (setq uri ...)) (concat uri (or file-name "subject.txt")))
)
(navi2ch-expand-file-name (let (...) (string-match "http://\$.+\$" uri) (setq uri ...) (when ... ...) (concat uri ...)))
)
navi2ch-board-get-file-name(nil "")
(let* ((dir ...) (list ...) (key-datevec ...)) (dolist (file list) (when ... ... ... ...)))
)
navi2ch-board-expire()
run-hooks(navi2ch-board-expire)
navi2ch-board-mode()
navi2ch-board-select-board(((name . "UNIX") (uri . "http://cocoa.2ch.net/unix/") (id . "unix")) nil)
(cond ((eq type ...) (navi2ch-bookmark)) ((eq type ...) (navi2ch-articles)) ((eq type ...) (navi2ch-search)) (t (navi2ch-board-select-board board force)))
)
(let ((type ...)) (cond (... ...) (... ...) (... ...) (t ...)))
)
navi2ch-bm-select-board(((name . "UNIX") (uri . "http://cocoa.2ch.net/unix/") (id . "unix")) nil)
(let ((flag ...)) (when (and ... flag) (delete-windows-on navi2ch-board-buffer-name)) (dolist (x ...) (when x ...)) (when (and flag navi2ch-list-stay-list-window) (split-window-horizontally navi2ch-list-window-width) (other-window 1)) (navi2ch-bm-select-board board force))
)
navi2ch-list-select-board(((name . "UNIX") (uri . "http://cocoa.2ch.net/unix/") (id . "unix")) nil)
(cond ((setq prop ...) (navi2ch-list-select-board prop force)) ((get-text-property ... ...) (navi2ch-list-toggle-open)) (t (message "can't select this line!")))
)
(let (prop) (cond (... ...) (... ...) (t ...)))
)
navi2ch-list-select-current-board(nil)
call-interactively(navi2ch-list-select-current-board)

次10 前10 最新10

read.cgi ver5.26+ (01/10/21-)