From: Erik Naggum <erik@naggum.no>
Date: Tue, 9 Jan 1996 00:30:45 +0000 (+0000)
Subject: (Fupcase_region, Fdowncase_region, Fcapitalize_region,
X-Git-Tag: emacs-19.34~1797
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8c22d56c58f4839710362e63d59606a310ef7940;p=emacs.git

(Fupcase_region, Fdowncase_region, Fcapitalize_region,
Fupcase_initials_region): Harmonize arguments with documentation.
---

diff --git a/src/casefiddle.c b/src/casefiddle.c
index a208809ae2a..d6d72877a66 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -160,10 +160,10 @@ These arguments specify the starting and ending character numbers of\n\
 the region to operate on.  When used as a command, the text between\n\
 point and the mark is operated on.\n\
 See also `capitalize-region'.")
-  (b, e)
-     Lisp_Object b, e;
+  (beg, end)
+     Lisp_Object beg, end;
 {
-  casify_region (CASE_UP, b, e);
+  casify_region (CASE_UP, beg, end);
   return Qnil;
 }
 
@@ -172,10 +172,10 @@ DEFUN ("downcase-region", Fdowncase_region, Sdowncase_region, 2, 2, "r",
 These arguments specify the starting and ending character numbers of\n\
 the region to operate on.  When used as a command, the text between\n\
 point and the mark is operated on.")
-  (b, e)
-     Lisp_Object b, e;
+  (beg, end)
+     Lisp_Object beg, end;
 {
-  casify_region (CASE_DOWN, b, e);
+  casify_region (CASE_DOWN, beg, end);
   return Qnil;
 }
 
@@ -185,10 +185,10 @@ Capitalized form means each word's first character is upper case\n\
 and the rest of it is lower case.\n\
 In programs, give two arguments, the starting and ending\n\
 character positions to operate on.")
-  (b, e)
-     Lisp_Object b, e;
+  (beg, end)
+     Lisp_Object beg, end;
 {
-  casify_region (CASE_CAPITALIZE, b, e);
+  casify_region (CASE_CAPITALIZE, beg, end);
   return Qnil;
 }
 
@@ -200,10 +200,10 @@ DEFUN ("upcase-initials-region", Fupcase_initials_region,
 Subsequent letters of each word are not changed.\n\
 In programs, give two arguments, the starting and ending\n\
 character positions to operate on.")
-  (b, e)
-     Lisp_Object b, e;
+  (beg, end)
+     Lisp_Object beg, end;
 {
-  casify_region (CASE_CAPITALIZE_UP, b, e);
+  casify_region (CASE_CAPITALIZE_UP, beg, end);
   return Qnil;
 }