diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/international/ccl.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el index 4ffea66caeb..e9e46bb0c6c 100644 --- a/lisp/international/ccl.el +++ b/lisp/international/ccl.el @@ -774,7 +774,8 @@ (ccl-check-register right rrr) (ccl-embed-code 'write-expr-register 0 (logior (ash op 3) - (get right 'ccl-register-number)))))) + (get right 'ccl-register-number)) + left)))) (t (error "CCL: Invalid argument: %s" cmd)))) |