From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 25 May 1994 03:53:30 +0000 (+0000)
Subject: (Freplace_match): Don't capitalize unless all matched words are capitalized.
X-Git-Tag: emacs-19.34~8180
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=026e833080f14f2db656344c86b488aeb6e1c9c1;p=emacs.git

(Freplace_match): Don't capitalize unless all matched words are capitalized.
---

diff --git a/src/search.c b/src/search.c
index 7819f1a8190..2ac8d14e0b0 100644
--- a/src/search.c
+++ b/src/search.c
@@ -1235,7 +1235,10 @@ Leaves point at end of replacement text.")
       if (! some_lowercase && some_multiletter_word)
 	case_action = all_caps;
       /* Capitalize each word, if the old text has all capitalized words.  */
-      else if (!some_lowercase_initial && some_multiletter_word)
+      /* We used to insist on some_multiletter_word here,
+	 but that screwed query replacing x with y, acting on X.
+	 Even what we have now is more strict than what 19.22 had.  */
+      else if (!some_lowercase_initial)
 	case_action = cap_initial;
       else
 	case_action = nochange;