[Date Prev][Date Next][Thread Prev][][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>