From: Kenichi Handa <handa@m17n.org>
Date: Mon, 6 Nov 2000 12:42:06 +0000 (+0000)
Subject: (decode-char, encode-char): Fix doc-string.
X-Git-Tag: emacs-pretest-21.0.90~272
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7f341749f74bf03835081007ce7813bda51dc8a3;p=emacs.git

(decode-char, encode-char): Fix doc-string.
---

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 922a9cf7d95..5255942da7d 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -289,7 +289,7 @@ See also the documentation of make-char."
 	      (not (eq (car l) 'composition))))))
 
 (defun decode-char (ccs code-point &optional restriction)
-  "Return a character specified by coded character set CCS and CODE-POINT in it.
+  "Return character specified by coded character set CCS and CODE-POINT in it.
 Return nil if such a character is not supported.
 Currently, supported coded character set is `ucs' (ISO/IEC
 10646: Universal Multi-Octet Coded Character Set) only.
@@ -316,12 +316,12 @@ and CODE-POINT to a chracter.   Currently not supported and just ignored."
 	       ))))
 
 (defun encode-char (char ccs &optional restriction)
-  "Return a code-point in coded character set CCS that corresponds to CHAR.
+  "Return code-point in coded character set CCS that corresponds to CHAR.
 Return nil if CHAR is not included in CCS.
 Currently, supported coded character set is `ucs' (ISO/IEC
 10646: Universal Multi-Octet Coded Character Set) only.
-Return a Unicode character code for CHAR.
-Charset of CHAR should be one of these:
+
+CHAR should be in one of these charsets:
   ascii, latin-iso8859-1, mule-unicode-0100-24ff, mule-unicode-2500-33ff,
   mule-unicode-e000-ffff
 Otherwise, return nil.