[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Antenna editor (about://antenna-edit/) abolished



experimental-async 枝の merge と同時に,w3m-antenna.el を拡張しました.

従来,各サイトの更新時間を検査する方法は,time / hns / nil と言った特
定の検査用の class でしか指定できなかったのですが,通常の関数が使える
ようにしました.例えば,これまで

    闘わないプログラマ
       http://www.amy.hi-ho.ne.jp/~lepton/program/index.html

に連載されている個別のエッセイを antenna で追跡することは出来なかった
のですが,

    ("http://www.amy.hi-ho.ne.jp/~lepton/program/index.html"
     "闘わないプログラマ"
     (w3m-antenna-check-anchor "<a href=\"\\(^[\"]+/prog[0-9]+\\.html\">" 1)))

というように,トップページと実際のページへのリンクに一致する正規表現の
組み合わせで指定できるようになっています.

この変更に伴い,通常の form でS式を編集するためのコマンドを提供すると
いう手法(= about://antenna-edit/ の手法)そのものに限界を感じたので,すっ
ぱりと該当部分を削除しました.

今後は単純に M-x customize-variable RET w3m-antenna-sites RET してくだ
さい.将来的には,Gnus の group parameter の editor のような感じの 
widget-based antenna editor が実装できるといいなあ,と思っているのです
が,(個人的都合により)当面は作業できないと思います.

ただ,現在,w3m-antenna-sites の customize spec が何か間違っているらし
くて,うまく customize-variable することができません.ちょっと単純化す
ると,

(defcustom w3m-antenna-sites
  (unless noninteractive
    (mapcar (lambda (site)
              (list (w3m-antenna-site-key site)
                    (w3m-antenna-site-title site)
                    (w3m-antenna-site-class site)))
            (w3m-load-list w3m-antenna-file)))
  "*Sites"
  :group 'w3m-antenna
  :type '(repeat
          (list (string :tag "Key")
                (string :tag "Title")
                (choice (const :tag "Normal" nil)
                        (const :tag "Time" time)
                        (const :tag "HNS" hns)
                        (cons fuction-item (repeat sexp))))))

ということがしたいのですが,これだと mismatch と言われてしまって,困っ
ています.

-- 
土屋 雅稔 ( TSUCHIYA Masatoshi )