* lisp/international/ccl.el: Fix quoting.

diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el
index b9cc1633915b5dfdc9eb437cf342fdf012c2e40e..08c18e1fdc79d8c7491196caaeda7ac878302bce 100644 (file)
--- a/lisp/international/ccl.el
+++ b/lisp/international/ccl.el
@@ -967,7 +967,8 @@ is a list of CCL-BLOCKs."
   (let ((len (length ccl-code))
        (buffer-mag (aref ccl-code 0)))
     (cond ((= buffer-mag 0)
-          (insert "Don’t output anything.\n"))
+          (insert (substitute-command-keys
+                    "Don’t output anything.\n")))
          ((= buffer-mag 1)
           (insert "Out-buffer must be as large as in-buffer.\n"))
          (t