# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 973514526 0
# Node ID 9366a16a186b6cb34b06877e6716949208ca5ea9
# Parent  59edd748e69a842e31108456fdcb4fbcf08dfe55
(decode-char, encode-char): Fix doc-string.

diff -r 59edd748e69a -r 9366a16a186b lisp/international/mule.el
--- a/lisp/international/mule.el	Mon Nov 06 12:40:34 2000 +0000
+++ b/lisp/international/mule.el	Mon Nov 06 12:42:06 2000 +0000
@@ -289,7 +289,7 @@
 	      (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 @@
 	       ))))
 
 (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.