diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/international/quail.el | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 91963a31f09..c9f57f0aae3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2008-04-24 Stefan Monnier <monnier@iro.umontreal.ca> + * international/quail.el (quail-build-decode-map): Avoid string-bytes. + * textmodes/ispell.el (ispell-dictionary-alist-1) (ispell-dictionary-alist-2, ispell-dictionary-alist-3): (ispell-dictionary-alist-4, ispell-dictionary-alist-5): diff --git a/lisp/international/quail.el b/lisp/international/quail.el index 90466f57cdd..e4144bb0a2d 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -2309,7 +2309,7 @@ Optional 6th arg IGNORES is a list of translations to ignore." ;; Accept only non-ASCII chars not ;; listed in IGNORES. (if (and (if (integerp x) (> x 255) - (> (string-bytes x) (length x))) + (string-match-p "[^[:ascii:]]" x)) (not (member x ignores))) (setq multibyte t)))) translation) |