From: Kenichi Handa <handa@m17n.org>
Date: Thu, 26 Nov 1998 08:12:12 +0000 (+0000)
Subject: (ccl-dump-translate-character-const-tbl):
X-Git-Tag: emacs-20.4~1178
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8137b8e3fe23df5c004114fd608c76e84685c425;p=emacs.git

(ccl-dump-translate-character-const-tbl):
Give format correct control string.
---

diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el
index 505ccce757b..b22fd32cbda 100644
--- a/lisp/international/ccl.el
+++ b/lisp/international/ccl.el
@@ -1252,7 +1252,7 @@
 
 (defun ccl-dump-translate-character-const-tbl (rrr RRR Rrr)
   (let ((tbl (ccl-get-next-code)))
-    (insert (format "translation table(%d) r%d r%d\n" tbl RRR rrr))))
+    (insert (format "translation table(%S) r%d r%d\n" tbl RRR rrr))))
 
 (defun ccl-dump-iterate-multiple-map (rrr RRR Rrr)
   (let ((notbl (ccl-get-next-code))