(codepage-setup): Doc fix.

(cp-decoding-vector-for-codepage): Likewise.

diff --git a/lisp/international/codepage.el b/lisp/international/codepage.el
index a804792385d99fccb237848ee59ef8890d7a168b..026aa6c2ea1cc1a12d8e0605383ba76e9605c879 100644 (file)
--- a/lisp/international/codepage.el
+++ b/lisp/international/codepage.el
@@ -132,7 +132,7 @@ variety is actually just an alias for the -unix variety)."
 (defun cp-decoding-vector-for-codepage (table charset offset)
   "Create a vector for decoding IBM PC characters using conversion table
 TABLE into an ISO-8859 character set CHARSET whose first non-ASCII
-character' is generated by (make-char CHARSET OFFSET)."
+character is generated by (make-char CHARSET OFFSET)."
   (let* ((len (length table))
         (undefined-char
          (if (eq system-type 'ms-dos)
@@ -513,12 +513,11 @@ is a vector, and has a charset property."
 
 ;;;###autoload
 (defun codepage-setup (codepage)
-  "Create 2 coding systems for codepage CODEPAGE: cpCODEPAGE-dos and
-cpCODEPAGE-unix.
+  "Create a coding system cpCODEPAGE to support the IBM codepage CODEPAGE.
 
 These coding systems are meant for encoding and decoding 8-bit non-ASCII
 characters used by the IBM codepages, typically in conjunction with files
-read/written by MS-DOS software, or for display on MS-DOS terminal."
+read/written by MS-DOS software, or for display on the MS-DOS terminal."
   (interactive
    (let ((completion-ignore-case t)
         (candidates (cp-supported-codepages)))