diff options
| author | Keitaro Miyazaki <keitaro.miyazaki@gmail.com> | 2011-01-22 15:54:27 -0500 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2011-01-22 15:54:27 -0500 |
| commit | d647640760eedb9dc1fe8d1ce77edea97506dc1a (patch) | |
| tree | fe4b278ed5f72d3dd8ac57a392c7aac808feacc1 /lisp/emacs-lisp/re-builder.el | |
| parent | 28a881534e2dcc072d731f562f1bb244e5fafaea (diff) | |
| download | emacs-d647640760eedb9dc1fe8d1ce77edea97506dc1a.tar.gz emacs-d647640760eedb9dc1fe8d1ce77edea97506dc1a.tar.bz2 emacs-d647640760eedb9dc1fe8d1ce77edea97506dc1a.zip | |
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.
Diffstat (limited to 'lisp/emacs-lisp/re-builder.el')
| -rw-r--r-- | lisp/emacs-lisp/re-builder.el | 4 |
1 files changed, 3 insertions, 1 deletions
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 |