summaryrefslogtreecommitdiff
path: root/lisp/international/ccl.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2015-08-30 23:10:51 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2015-08-30 23:12:31 -0700
commit9ffb6ce9a7b5692f8470ea227e677a16a6654f66 (patch)
tree6eeb83c937fd5023299604916decb38f511a86e0 /lisp/international/ccl.el
parentd1729604c4ddb9a5314f3d8a1e0c76536cffad85 (diff)
downloademacs-9ffb6ce9a7b5692f8470ea227e677a16a6654f66.tar.gz
Quoting fixes in lisp/international and lisp/leim
* lisp/international/ccl.el (ccl-dump, ccl-dump-call): * lisp/international/ja-dic-utl.el (skkdic-lookup-key): * lisp/international/mule-cmds.el: (select-safe-coding-system-interactively, leim-list-file-name): * lisp/international/quail.el (quail-use-package, quail-help): * lisp/international/titdic-cnv.el (tit-process-header) (miscdic-convert): Respect text quoting style in doc strings and diagnostics. * lisp/international/quail.el (lisp/international/quail.el): * lisp/leim/quail/ethiopic.el ("ethiopic"): Escape apostrophes in doc strings.
Diffstat (limited to 'lisp/international/ccl.el')
-rw-r--r--lisp/international/ccl.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el
index 429c14b5e44..b9cc1633915 100644
--- a/lisp/international/ccl.el
+++ b/lisp/international/ccl.el
@@ -967,7 +967,7 @@ 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 "Don’t output anything.\n"))
((= buffer-mag 1)
(insert "Out-buffer must be as large as in-buffer.\n"))
(t
@@ -1127,7 +1127,7 @@ is a list of CCL-BLOCKs."
(defun ccl-dump-call (ignore cc)
(let ((subroutine (car (ccl-get-next-code))))
- (insert (format "call subroutine `%s'\n" subroutine))))
+ (insert (format-message "call subroutine `%s'\n" subroutine))))
(defun ccl-dump-write-const-string (rrr cc)
(if (= rrr 0)