APEL-CFG

[Katsumi Yamaoka]

>>>>> In [apel-ja : No.00096] 
>>>>>	Shuhei KOBAYASHI <shuhei ＠ aqua.ocn.ne.jp> wrote:

> 「新しい custom をお持ちじゃないですか?」と言わせる手...

小林さん> 結局自分で満足できるものを書いてしまいました.  APEL 以外で必
小林さん> 要な所に含めてもらっても構いません.

どうもありがとうございます。がぜんカッコ良くなりましたね。:-)

小林さん> ;; 文章に間違いがあったら教えてください(^^; それと, 求む 
小林さん> ;; XEmacs 情報.

ん、XEmacs の何ですか?

小林さん> ところで, pcustom.el の変更点
小林さん> (if (null (featurep 'pcustom))

小林さん> ;; (unless (featurep 'pcustom) ...) の方が好みだというのは置
小林さん> ;; いといて.
小林さん> ;;; 少なくとも `null' じゃないよね.

;;; null は意味的に変ですか? (^^;;)
;; unless を使うには cl を eval-when-compile で呼ぶ必要がありますが、
;; eval-when-compile は old emacsen では progn なので却下。:-p

小林さん> は, なぜ (featurep 'pcustom) なのですか?  未確認ですが,
小林さん> pcustom.el のbyte-compile の前にどこかで (require 'pcustom) 
小林さん> が行なわれるので, ここが2 度評価されてしまうということでしょ
小林さん> うか?

はい、一回目は mcharset.el が require するとき、二回目は pcustom.el 自
身を compile するときです。New custom が使いたくても使えない環境ではう
るさいかと思いましてあのようにしました。
-- 
Katsumi Yamaoka <yamaoka ＠ jpl.org>