[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: super shimbun class?
>>>>> In [emacs-w3m : No.04618]
>>>>> Yoichi NAKAYAMA <yoichi@eken.phys.nagoya-u.ac.jp> wrote:
中山さん> 時間ができたので info を書こうかと思ったのですが、すでにいろ
中山さん> いろ手があがっているようなのでそこを避けて shimbun の
中山さん> wanderlust のとこでも書こうか(←まだ誰も書いてなければやりま
中山さん> す。)
おお、ありがとうございます。よろしくお願いします。
;; 外堀を埋めた甲斐があった、かな。:-p
中山さん> と思った所で、ちょっと欲しいものが出てきました。
中山さん> shimbun を使っていて、どんな新聞があるのかなぁと思った時に、
中山さん> 全ての新聞の一覧が欲しいと思うことがあります。
中山さん> 例えば Wanderlust で @/ なグループを作成するとインストールさ
中山さん> れている新聞の一覧が見れる。
中山さん> 何か shimbun のリストみたいな変数があって、自分で個人的にイ
中山さん> ンストールした sb-*.el があればそれに append すれば一覧に入
中山さん> る。
中山さん> こんなのできませんかね?
中山さんはすでに構想をお持ちなのでは? :)
nnshimbun.el の gnus-group-make-shimbun-group() では毎回
directory-files でサーバーとグループのリストを作っているので少し
だけ待たされるのですが、make 時に作っておけば楽になりますね。
;;; sb-groups.el
(defvar shimbun-groups-alist
'(("2ch")
("airs" "semi-gnus-ja" "wl" "wl-en")
("asahi-html" "national" "business" "politics"...)
[...]
))
(defvar shimbun-groups-alist-user-defined nil)
(defun shimbun-groups-alist ()
(append shimbun-groups-alist shimbun-groups-alist-user-defined))
といったものでしょうか。
--
Katsumi Yamaoka <yamaoka@jpl.org>