diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2015-08-30 23:10:51 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2015-08-30 23:12:31 -0700 |
commit | 9ffb6ce9a7b5692f8470ea227e677a16a6654f66 (patch) | |
tree | 6eeb83c937fd5023299604916decb38f511a86e0 /lisp/international/ja-dic-utl.el | |
parent | d1729604c4ddb9a5314f3d8a1e0c76536cffad85 (diff) | |
download | emacs-9ffb6ce9a7b5692f8470ea227e677a16a6654f66.tar.gz emacs-9ffb6ce9a7b5692f8470ea227e677a16a6654f66.tar.bz2 emacs-9ffb6ce9a7b5692f8470ea227e677a16a6654f66.zip |
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/ja-dic-utl.el')
-rw-r--r-- | lisp/international/ja-dic-utl.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/international/ja-dic-utl.el b/lisp/international/ja-dic-utl.el index 8400c473afa..7005ba85726 100644 --- a/lisp/international/ja-dic-utl.el +++ b/lisp/international/ja-dic-utl.el @@ -109,13 +109,14 @@ without okurigana are placed at the head of the returned list." (load-library "ja-dic/ja-dic") (error (ding) (with-output-to-temp-buffer "*Help*" - (princ "The library `ja-dic' can't be loaded. + (princ (substitute-command-keys "\ +The library `ja-dic' can't be loaded. The most common case is that you have not yet installed the library included in LEIM (Libraries of Emacs Input Method) which is distributed separately from Emacs. -LEIM is available from the same ftp directory as Emacs.")) +LEIM is available from the same ftp directory as Emacs."))) (signal (car err) (cdr err))))) (let ((vec (make-vector len 0)) |