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

2015-08-30 23:35:41 -07:00 · 2015-08-30 23:35:41 -07:00 · 6514fe8890
commit 6514fe8890
parent 9ffb6ce9a7
1 changed files with 2 additions and 1 deletions
--- 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