some XEmacs functions

[Shuhei KOBAYASHI]

>>>>> In <86u250lh9l.fsf ＠ aqua.ocn.ne.jp>,
>>>>> Shuhei KOBAYASHI <shuhei ＠ aqua.ocn.ne.jp> wrote:
> >>>>> In <m2r9e61csx.fsf ＠ kiss.kake.info.waseda.ac.jp>,
> >>>>> Daiki Ueno <ueno ＠ kiss.kake.info.waseda.ac.jp> wrote:
> > いくつか邪悪なものを commit しました。
> > 
> > XEmacs 19.13 and later:
> > remassq, remassoc, remrassoc
> 
> これらの定義は間違っているみたいですね.

remassoc, remassq, remrassoc, remrassq の定義を修正しました.
何となくこんなものを書いてみたくなったので...

(mime-parse-user-agent
 "T-gnus/6.15.3 (based on Oort Gnus v0.03) XEmacs/21.5 (beta0)
 (alfalfa) (sparc-sun-solaris2.6) WEMI/1.14.3
 (=?ISO-2022-JP?B?GyRCNmJDKxsoQg==?=) CLIME/1.14.0
 (=?ISO-2022-JP?B?GyRCOF40VkYyGyhC?=) APEL/10.3")

=> (["T-gnus" nil (6 15 3) "based on Oort Gnus v0.03" nil nil nil "6.15.3"]
    ["XEmacs" nil (21 5) "beta0 alfalfa sparc-sun-solaris2.6" nil nil nil "21.5"]
    ["WEMI" nil (1 14 3) "金谷" nil nil nil "1.14.3"]
    ["CLIME" nil (1 14 0) "五間堂" nil nil nil "1.14.0"]
    ["APEL" nil (10 3) "" nil nil nil "10.3"])

;; 何かの役に立つのでしょうか?
;; BBDB などで User-Agent を収集している人には使いみちがある?
-- 
Shuhei KOBAYASHI
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: 無し
型:         application/octet-stream
サイズ:     3698 バイト
説明:       無し
URL:        <http://lists.chise.org/pipermail/apel-ja/attachments/20010429/e389892f/attachment-0001.obj>