From: Andreas Schwab <schwab@suse.de>
Date: Fri, 30 Oct 1998 10:13:36 +0000 (+0000)
Subject: (Fchar_bytes): Doc fix.
X-Git-Url: https://git.hcoop.net/bpt/emacs.git/commitdiff_plain/60022cb7128db8e4a9a8bf2d651e5960fa5bfc05

(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 --git a/src/charset.c b/src/charset.c
index 85456203af..f7a5cae63f 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -1050,7 +1050,7 @@ The conversion is done based on `nonascii-translation-table' (which see)\n\
 
 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 @@ char_bytes (c)
       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 @@ See also the docstring of `make-translation-table'.");
     "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 */