diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2003-02-14 11:09:52 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2003-02-14 11:09:52 +0000 |
| commit | 83930535822b5a44809c0e3969f03c9ebdcf2ce2 (patch) | |
| tree | 97da96a230d2750d5aa0b06b0c1f3bab12c8c3a4 /leim | |
| parent | dcca5896089d58bc1c70d0c446c592e1eb935a40 (diff) | |
| download | emacs-83930535822b5a44809c0e3969f03c9ebdcf2ce2.tar.gz | |
(utf-8-ccl-encode): Fix use of character constants.
Diffstat (limited to 'leim')
| -rw-r--r-- | leim/ChangeLog | 5 | ||||
| -rw-r--r-- | leim/quail/uni-input.el | 6 |
2 files changed, 8 insertions, 3 deletions
diff --git a/leim/ChangeLog b/leim/ChangeLog index 1664dd412ec..09cd588735f 100644 --- a/leim/ChangeLog +++ b/leim/ChangeLog @@ -1,3 +1,8 @@ +2003-02-14 Juanma Barranquero <lektu@terra.es> + + * quail/uni-input.el (utf-8-ccl-encode): Fix use of character + constants. + 2003-02-11 KAWABATA, Taichi <kawabata@m17n.org> * quail/indian.el (punjabi-itrans, gujarati-itrans, oriya-itrans) diff --git a/leim/quail/uni-input.el b/leim/quail/uni-input.el index b89b9a613e6..b8907578be0 100644 --- a/leim/quail/uni-input.el +++ b/leim/quail/uni-input.el @@ -50,7 +50,7 @@ (write ((r0 & ?\x3F) | ?\x80))) (if (r0 < #x200000) ((write ((r0 >> 18) | ?\xF0)) - (write (((r0 >> 12) & ?\3F) | ?\x80)) + (write (((r0 >> 12) & ?\x3F) | ?\x80)) (write (((r0 >> 6) & ?\x3F) | ?\x80)) (write ((r0 & ?\x3F) | ?\x80))) (if (r0 < #x4000000) @@ -58,13 +58,13 @@ (write (((r0 >> 18) & ?\x3F) | ?\x80)) (write (((r0 >> 12) & ?\x3F) | ?\x80)) (write (((r0 >> 6) & ?\x3F) | ?\x80)) - (write ((r0 & ?\x3f) | ?\x80))) + (write ((r0 & ?\x3F) | ?\x80))) ((write ((r0 >> 30) | ?\xFC)) (write (((r0 >> 24) & ?\x3F) | ?\x80)) (write (((r0 >> 18) & ?\x3F) | ?\x80)) (write (((r0 >> 12) & ?\x3F) | ?\x80)) (write (((r0 >> 6) & ?\x3F) | ?\x80)) - (write ((r0 & ?\x3f) | ?\x80)))))))))) + (write ((r0 & ?\x3F) | ?\x80)))))))))) (defun ucs-input-method (key) (if (or buffer-read-only |