From f551b97db69daa183058ebad11894000569a549f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 19 Jan 1994 18:45:34 +0000 Subject: [PATCH] (isearch-push-state): Save isearch-case-fold-search. (isearch-top-state): Restore it. --- lisp/isearch.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index 7fd87e05e95..11f829c3af5 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -4,7 +4,7 @@ ;; Author: Daniel LaLiberte -;; |$Date: 1994/01/15 16:24:47 $|$Revision: 1.61 $ +;; |$Date: 1994/01/16 23:40:50 $|$Revision: 1.62 $ ;; This file is part of GNU Emacs. @@ -1240,7 +1240,8 @@ If there is no completion possible, say so and continue searching." isearch-invalid-regexp (nth 7 cmd) isearch-wrapped (nth 8 cmd) isearch-barrier (nth 9 cmd) - isearch-within-brackets (nth 10 cmd)) + isearch-within-brackets (nth 10 cmd) + isearch-case-fold-search (nth 11 cmd)) (goto-char (car (cdr (cdr cmd)))))) (defun isearch-pop-state () @@ -1254,7 +1255,7 @@ If there is no completion possible, say so and continue searching." isearch-success isearch-forward isearch-other-end isearch-word isearch-invalid-regexp isearch-wrapped isearch-barrier - isearch-within-brackets) + isearch-within-brackets isearch-case-fold-search) isearch-cmds))) -- 2.39.5