# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 871903157 0
# Node ID 309b9a0d8a456dbcd7960ee79fc749d599179afa
# Parent  d1aed74cff5eb23622a3c3005397cfebe6132d78
(Fchars_in_region): Renamed form Fcount_chars_region.
(syms_of_charset): Define Schars_in_region as a Lisp subroutine
instead of Scount_chars_region.

diff -r d1aed74cff5e -r 309b9a0d8a45 src/charset.c
--- a/src/charset.c	Mon Aug 18 11:03:26 1997 +0000
+++ b/src/charset.c	Mon Aug 18 11:19:17 1997 +0000
@@ -895,7 +895,7 @@
   return val;
 }
 
-DEFUN ("count-chars-region", Fcount_chars_region, Scount_chars_region, 2, 2, 0,
+DEFUN ("chars-in-region", Fchars_in_region, Schars_in_region, 2, 2, 0,
   "Return number of characters between BEG and END.\n\
 When using multibyte characters, this is not the necessarily same as\n\
 (- END BEG); that subtraction gives you the number of bytes, which\n\
@@ -1554,7 +1554,7 @@
   defsubr (&Sstring_width);
   defsubr (&Schar_direction);
   defsubr (&Schars_in_string);
-  defsubr (&Scount_chars_region);
+  defsubr (&Schars_in_region);
   defsubr (&Schar_boundary_p);
   defsubr (&Sconcat_chars);
   defsubr (&Scmpcharp);