poem's char-or-char-int-p causes invalid character errors

[Tatsuya Kinoshita]

On May 9, 2005, [apel-ja:01270],
tomo (at m17n.org) wrote:

> + (defalias-maybe 'char-valid-p 'integerp)

> という風に、char-valid-p を defalias-maybe してしまうのはまずいでしょ
> うか？

単にintegerpにしてしまうと、XEmacsで今回と同じような問題が起こりやす
くなってしまわないでしょうか。(たとえばgnus/lisp/mm-util.elの
mm-char-or-char-int-pでchar-or-char-int-pとchar-valid-pの判定順が逆
だったら……)

定義するなら、下記のような感じだとどうでしょうか。

(defalias-maybe 'char-valid-p
  (cond
   ((fboundp 'char-or-char-int-p) 'char-or-char-int-p)
   (t 'integerp)))

-- 
木下達也