Mercurial > emacs
changeset 23318:102eb438b2e1
(isearch-search-and-update): Properly
handle upper case letters in the reverse-search special case.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Fri, 25 Sep 1998 16:53:04 +0000 |
parents | 4f85050ca43c |
children | 6d8f2c66943f |
files | lisp/isearch.el |
diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/isearch.el Fri Sep 25 16:51:32 1998 +0000 +++ b/lisp/isearch.el Fri Sep 25 16:53:04 1998 +0000 @@ -1032,6 +1032,9 @@ (if (and (not isearch-forward) (not isearch-adjusted) (condition-case () (let ((case-fold-search isearch-case-fold-search)) + (if (and (eq case-fold-search t) search-upper-case) + (setq case-fold-search + (isearch-no-upper-case-p isearch-string isearch-regexp))) (looking-at (if isearch-regexp isearch-string (regexp-quote isearch-string)))) (error nil))