# HG changeset patch # User Richard M. Stallman # Date 759005134 0 # Node ID b0d6fc7f5e6575502bb19a066c4cd0f667a0e719 # Parent 7c7250844e723eb27f78530f3c2254c1b60eebc1 (isearch-push-state): Save isearch-case-fold-search. (isearch-top-state): Restore it. diff -r 7c7250844e72 -r b0d6fc7f5e65 lisp/isearch.el --- a/lisp/isearch.el Wed Jan 19 17:21:49 1994 +0000 +++ b/lisp/isearch.el Wed Jan 19 18:45:34 1994 +0000 @@ -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 @@ 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 @@ 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)))