[Mew-Win32 00357] Re: New mew-caesar.el beta

[YAMAGUCHI, Shuhei]

やまぐち＠ねっとらぴゅたの住人、です。

>>> In article <19980304125327F.shirai at example.com>,
>>>    Hideyuki SHIRAI <Shirai at example.com> writes:

  小関> そうだそうだ、semi or tm を使っている(インストールされている)
  小関> とか、mime-setup しているというのはどうやって判断するのだろ
  小関> う? と思った事がある。
  Shirai> 
  Shirai> 私も思ったことがあるのですが、結局あきらめちゃった。;_;

tmやSEMIに関しては、locate-libraryが使えるんじゃないでしょうか?
(cond ((locate-library "SEMIだけが持つ関数")
       (require 'mule-caesar)
       nil)
      ((locate-library "tmだけが持つ関数")
       (require 'tm-def)
       t)
      (t
       "ext"))
のような感じでいかがでしょう?

ちなみに、このlocate-libraryで、Mewをこんな風に設定してたりします。
(setq mew-icon-directory
      (expand-file-name "etc" (file-name-directory (locate-library "mew"))))


  小関> こんなことするのだろうか? このfile-existsのような関数って標
  小関> 準でありませんか?

mew-caesarの場合、Mew用ということでMewの関数が使えますね。
mew-func.elにある(mew-which file path)は、まさに小関さんのfile-exists
に相当します。
#(require 'mew)で読み込まれるので、別段requireを増やす必要はないです。

でわでわ
-- 
yamagus at example.com / 山口 修平
  yamagus at example.com / やまぐち＠ねっとらぴゅたの住人
PGP-Fingerprint: 25 0F 6F E1 57 AD 56 08  3A BC D0 9B 48 AF 31 7A
(会社より)