From: Keitaro Miyazaki Date: Sat, 22 Jan 2011 20:54:27 +0000 (-0500) Subject: Fix toggling of case-fold-search from re-builder menu (Bug#7650). X-Git-Tag: emacs-pretest-23.2.93~41 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d647640760eedb9dc1fe8d1ce77edea97506dc1a;p=emacs.git Fix toggling of case-fold-search from re-builder menu (Bug#7650). * emacs-lisp/re-builder.el (reb-mode-map): Set case-fold-search in the correct buffer. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e8d56288944..789d646f6d0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-01-22 Keitaro Miyazaki + + * emacs-lisp/re-builder.el (reb-mode-map): Set case-fold-search in + the correct buffer (Bug#7650). + 2011-01-22 Glenn Morris * button.el (make-text-button): Doc fix. (See bug#7881) diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el index db14b9574e6..fd47c576404 100644 --- a/lisp/emacs-lisp/re-builder.el +++ b/lisp/emacs-lisp/re-builder.el @@ -247,7 +247,9 @@ Except for Lisp syntax this is the same as `reb-regexp'.") :help "Quit the RE Builder mode")) (define-key menu-map [rt] '(menu-item "Case sensitive" reb-toggle-case - :button (:toggle . (null case-fold-search)) + :button (:toggle . (with-current-buffer + reb-target-buffer + (null case-fold-search))) :help "Toggle case sensitivity of searches for RE Builder target buffer")) (define-key menu-map [rb] '(menu-item "Change target buffer..." reb-change-target-buffer