summaryrefslogtreecommitdiff
path: root/lisp/international/ccl.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2006-03-03 11:36:46 +0000
committerKenichi Handa <handa@m17n.org>2006-03-03 11:36:46 +0000
commit6f0e87cb689fcac8a2949a00247045c1c5ee18c2 (patch)
tree6d3f5caf83aa083719f5048a5a4ad7e34c277a96 /lisp/international/ccl.el
parent08dcb0925ffbc2c2baa7d1e98089edbdd1656845 (diff)
downloademacs-6f0e87cb689fcac8a2949a00247045c1c5ee18c2.tar.gz
(ccl-dump-write-const-string): Fix previous
change.
Diffstat (limited to 'lisp/international/ccl.el')
-rw-r--r--lisp/international/ccl.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el
index 0ee5999efbc..e9dac8b6812 100644
--- a/lisp/international/ccl.el
+++ b/lisp/international/ccl.el
@@ -1140,7 +1140,7 @@
(insert "write \"")
(while (< i len)
(let ((code (ccl-get-next-code)))
- (if (logand code #x1000000)
+ (if (/= (logand code #x1000000) 0)
(progn
(insert (logand code #xFFFFFF))
(setq i (1+ i)))