From: Nick Roberts <nickrob@snap.net.nz>
Date: Sun, 1 May 2005 22:19:14 +0000 (+0000)
Subject: (Fchars_in_region): Remove as obsolete.
X-Git-Tag: ttn-vms-21-2-B4~602
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/189cbdd6bb2d92882499667a309d8ee7f637115d

(Fchars_in_region): Remove as obsolete.
---

diff --git a/src/charset.c b/src/charset.c
index c03107a9c4..81708d37b7 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -1431,22 +1431,6 @@ The returned value is 0 for left-to-right and 1 for right-to-left.  */)
   return CHARSET_TABLE_INFO (charset, CHARSET_DIRECTION_IDX);
 }
 
-DEFUN ("chars-in-region", Fchars_in_region, Schars_in_region, 2, 2, 0,
-       doc: /* Return number of characters between BEG and END.  */)
-     (beg, end)
-     Lisp_Object beg, end;
-{
-  int from, to;
-
-  CHECK_NUMBER_COERCE_MARKER (beg);
-  CHECK_NUMBER_COERCE_MARKER (end);
-
-  from = min (XFASTINT (beg), XFASTINT (end));
-  to = max (XFASTINT (beg), XFASTINT (end));
-
-  return make_number (to - from);
-}
-
 /* Return the number of characters in the NBYTES bytes at PTR.
    This works by looking at the contents and checking for multibyte sequences.
    However, if the current buffer has enable-multibyte-characters = nil,