# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 909742416 0
# Node ID 00ee2e0c8976acf0fce091d193eb0d44e717ca13
# Parent  6df77402dfd42f035f4b298e10922eb0436aeafe
(Fchar_bytes): Doc fix.
(char_bytes): Fix returned value to match returned type.
(syms_of_charset): Fix type clash in initialisation of
Vauto_fill_chars.

diff -r 6df77402dfd4 -r 00ee2e0c8976 src/charset.c
--- a/src/charset.c	Fri Oct 30 09:54:37 1998 +0000
+++ b/src/charset.c	Fri Oct 30 10:13:36 1998 +0000
@@ -1050,7 +1050,7 @@
 
 DEFUN ("char-bytes", Fchar_bytes, Schar_bytes, 1, 1, 0,
   "Return 1 regardless of the argument CHAR.\n\
-This is now an obsolte function.  We keep is just for backward compatibility.")
+This is now an obsolete function.  We keep it just for backward compatibility.")
   (ch)
      Lisp_Object ch;
 {
@@ -1081,7 +1081,7 @@
       bytes = CHARSET_DEFINED_P (charset) ? CHARSET_BYTES (charset) : 1;
     }
 
-  return make_number (bytes);
+  return bytes;
 }
 
 /* Return the width of character of which multi-byte form starts with
@@ -1966,8 +1966,8 @@
     "A char-table for characters which invoke auto-filling.\n\
 Such characters has value t in this table.");
   Vauto_fill_chars = Fmake_char_table (Qauto_fill_chars, Qnil);
-  CHAR_TABLE_SET (Vauto_fill_chars, ' ', Qt);
-  CHAR_TABLE_SET (Vauto_fill_chars, '\n', Qt);
+  CHAR_TABLE_SET (Vauto_fill_chars, make_number (' '), Qt);
+  CHAR_TABLE_SET (Vauto_fill_chars, make_number ('\n'), Qt);
 }
 
 #endif /* emacs */