mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-03 04:21:28 -08:00
Code Issues Projects Releases Wiki Activity

(Freplace_match): Calls to upcase_initials and upcase_initials_region changed

Browse source 
to Fupcase_initials and Fupcase_initials_region for consistency.
This commit is contained in:
Karl Heuer 1995-06-06 01:48:53 +00:00
parent 4aa6e42452
commit 2b2eead989
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/search.c
View file

@ -1694,7 +1694,7 @@ which is made by replacing the part of STRING that was matched.")
if (case_action == all_caps)
newtext = Fupcase (newtext);
else if (case_action == cap_initial)
newtext = upcase_initials (newtext);
newtext = Fupcase_initials (newtext);
return concat3 (before, newtext, after);
}
@ -1747,7 +1747,7 @@ which is made by replacing the part of STRING that was matched.")
if (case_action == all_caps)
Fupcase_region (make_number (point - inslen), make_number (point));
else if (case_action == cap_initial)
upcase_initials_region (make_number (point - inslen), make_number (point));
Fupcase_initials_region (make_number (point - inslen), make_number (point));
return Qnil;
}