Mercurial > emacs
changeset 34078:ebb2d5e5973e
(describe-char-after): Fix typo.
(describe-character-set, non-iso-charset-alist): Fix typo.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 01 Dec 2000 06:20:04 +0000 |
parents | b9883c4e5688 |
children | 6316cacc1e16 |
files | lisp/international/mule-diag.el |
diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-diag.el Fri Dec 01 06:19:31 2000 +0000 +++ b/lisp/international/mule-diag.el Fri Dec 01 06:20:04 2000 +0000 @@ -278,7 +278,7 @@ CHARSET-LIST is a list of Emacs' charsets into which characters of NON-ISO-CHARSET are mapped. -TRANSLATION-METHOD is a translatin table (symbol) to translate a +TRANSLATION-METHOD is a translation table (symbol) to translate a character code of NON-ISO-CHARSET to the corresponding Emacs character code. It can also be a function to call with one argument, a character code in NON-ISO-CHARSET. @@ -491,7 +491,7 @@ (if (= (aref info 2) 1) (format "%d\n" (aref info 3)) (format "%dx%d\n" (aref info 3) (aref info 3)))) - (insert "the final char of ISO2022's desgination sequence: ") + (insert "the final char of ISO2022's designation sequence: ") (if (aref info 8) (insert (format "`%c'\n" (aref info 8))) (insert "not assigned\n")) @@ -501,7 +501,7 @@ (charset-multibyte-form-string charset))) (let ((coding (plist-get (aref info 14) 'preferred-coding-system))) (when coding - (insert (format "prefered coding system: %s\n" coding)) + (insert (format "preferred coding system: %s\n" coding)) (search-backward (symbol-name coding)) (help-xref-button 0 #'describe-coding-system coding "mouse-2, RET: describe this coding system"))) @@ -593,7 +593,7 @@ (insert " " clm)) (insert "\n"))) (when composition - (insert "\nComposed with the following characerter(s) " + (insert "\nComposed with the following character(s) " (mapconcat (lambda (x) (format "`%c'" x)) (substring composed 1) ", ")