diff options
| author | Richard M. Stallman | 1994-05-25 03:53:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-05-25 03:53:30 +0000 |
| commit | 026e833080f14f2db656344c86b488aeb6e1c9c1 (patch) | |
| tree | 80a6233e0745932ac7c9447bebba926195e7daa9 /src | |
| parent | d7be42118080daa4f067ab0038b37f6938896df8 (diff) | |
| download | emacs-026e833080f14f2db656344c86b488aeb6e1c9c1.tar.gz emacs-026e833080f14f2db656344c86b488aeb6e1c9c1.zip | |
(Freplace_match): Don't capitalize unless all matched words are capitalized.
Diffstat (limited to 'src')
| -rw-r--r-- | src/search.c | 5 |
1 files changed, 4 insertions, 1 deletions
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.") | |||
| 1235 | if (! some_lowercase && some_multiletter_word) | 1235 | if (! some_lowercase && some_multiletter_word) |
| 1236 | case_action = all_caps; | 1236 | case_action = all_caps; |
| 1237 | /* Capitalize each word, if the old text has all capitalized words. */ | 1237 | /* Capitalize each word, if the old text has all capitalized words. */ |
| 1238 | else if (!some_lowercase_initial && some_multiletter_word) | 1238 | /* We used to insist on some_multiletter_word here, |
| 1239 | but that screwed query replacing x with y, acting on X. | ||
| 1240 | Even what we have now is more strict than what 19.22 had. */ | ||
| 1241 | else if (!some_lowercase_initial) | ||
| 1239 | case_action = cap_initial; | 1242 | case_action = cap_initial; |
| 1240 | else | 1243 | else |
| 1241 | case_action = nochange; | 1244 | case_action = nochange; |