tags 307260 + upstream tags 307260 + patch tags 307260 + pending thanks On May 3, 2005 at 2:46AM +0900, tats (at vega.ocn.ne.jp) wrote:
> > "Invalid character: 020031, 8217, 0x2019" errors while working. > > > /usr/share/emacs21/site-lisp/apel/poem.el:82: > > (defalias-maybe 'char-or-char-int-p 'integerp) > > > char-or-char-int-p is always bound to integerp. Gnus' nnrss.el uses > > Gnus' mm-util.el, in which char-or-char-int-p is used if it exists > > (char-valid-p otherwise). But with APEL loaded, char-or-char-int-p > > isn't reliable anymore... > > Thanks for the report. I'll ask the upstream developers about this. I asked, and the following patch has been applied to the upstream CVS version. This bug will be fixed in post-sarge. ---- --- apel.orig/poem.el +++ apel/poem.el @@ -77,9 +77,15 @@ (defalias-maybe 'int-char 'identity) -(defalias-maybe 'characterp 'integerp) - -(defalias-maybe 'char-or-char-int-p 'integerp) +(defalias-maybe 'characterp + (cond + ((fboundp 'char-valid-p) 'char-valid-p) + (t 'integerp))) + +(defalias-maybe 'char-or-char-int-p + (cond + ((fboundp 'char-valid-p) 'char-valid-p) + (t 'integerp))) (defun-maybe char-octet (ch &optional n) "Return the octet numbered N (should be 0 or 1) of char CH. ---- Thanks, -- Tatsuya Kinoshita
pgp4ltVpdBVHt.pgp
Description: PGP signature
