Mercurial > emacs
changeset 76749:6a1a4e97079e
(occur-next-error): *Occur* might not be displayed in the
selected frame. Reported by David Hansen <david.hansen@gmx.net>.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 26 Mar 2007 15:09:52 +0000 |
parents | e22915955932 |
children | c8470b905d7a |
files | lisp/ChangeLog lisp/replace.el |
diffstat | 2 files changed, 21 insertions(+), 17 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Mar 26 10:20:27 2007 +0000 +++ b/lisp/ChangeLog Mon Mar 26 15:09:52 2007 +0000 @@ -1,3 +1,8 @@ +2007-03-26 Stefan Monnier <monnier@iro.umontreal.ca> + + * replace.el (occur-next-error): *Occur* might not be displayed in the + selected frame. Reported by David Hansen <david.hansen@gmx.net>. + 2007-03-26 Richard Stallman <rms@gnu.org> * textmodes/flyspell.el (flyspell-large-region): @@ -6,15 +11,15 @@ 2007-03-26 Johan Bockg,Ae(Brd <bojohan+sf@dd.chalmers.se> * emacs-lisp/bytecomp.el (byte-compile-file-form-defmumble): - Use prin1 instead of princ. + Use prin1 instead of princ. 2007-03-25 Chong Yidong <cyd@stupidchicken.com> * faces.el (face-set-after-frame-default): Revert 2007-03-10 change. Merge in X resources before global face. - * progmodes/compile.el (compilation-start): Save - compilation-directory rather than default-directory as local var. + * progmodes/compile.el (compilation-start): + Save compilation-directory rather than default-directory as local var. (compilation-directory): Mark as safe local var. * files.el: Don't mark default-directory as a safe local var. @@ -69,13 +74,13 @@ 2007-03-23 David Vazquez <xeos00@gmail.com> (tiny change) - * progmodes/m4-mode.el (m4-m4-buffer, m4-m4-region): Fix - omission bug: Use m4-program-options to construct shell command. + * progmodes/m4-mode.el (m4-m4-buffer, m4-m4-region): + Fix omission bug: Use m4-program-options to construct shell command. 2007-03-23 David Kastrup <dak@gnu.org> - * progmodes/cc-mode.el (c-make-emacs-variables-local): Use - `mapcar' rather than `mapcan' to silence compiler warning. + * progmodes/cc-mode.el (c-make-emacs-variables-local): + Use `mapcar' rather than `mapcan' to silence compiler warning. 2007-03-22 Ralf Angeli <angeli@caeruleus.net> @@ -111,8 +116,7 @@ 2007-03-21 Chong Yidong <cyd@stupidchicken.com> * emulation/viper.el (viper-non-hook-settings): Handle mouse - clicks in describe-key and describe-key-briefly advice a little - better. + clicks in describe-key and describe-key-briefly advice a little better. 2007-03-21 Juanma Barranquero <lekktu@gmail.com> @@ -187,8 +191,8 @@ 2007-03-19 Martin Rudalics <rudalics@gmx.at> - * font-lock.el (lisp-font-lock-keywords-1): Highlight - define-globalized-minor-mode as a keyword. + * font-lock.el (lisp-font-lock-keywords-1): + Highlight define-globalized-minor-mode as a keyword. 2007-03-19 Kim F. Storm <storm@cua.dk> @@ -226,8 +230,7 @@ 2007-03-18 Detlev Zundel <dzu@gnu.org> * emacs-lisp/re-builder.el (reb-update-overlays): Do not mark - zero-width regexps as invalid but rather at least count them - correctly. + zero-width regexps as invalid but rather at least count them correctly. 2007-03-18 Thien-Thi Nguyen <ttn@gnu.org> @@ -259,8 +262,8 @@ 2007-03-17 Chong Yidong <cyd@stupidchicken.com> - * simple.el (line-move-1): Respect - `inhibit-line-move-field-capture' property. + * simple.el (line-move-1): + Respect `inhibit-line-move-field-capture' property. 2007-03-13 Chong Yidong <cyd@stupidchicken.com> @@ -273,7 +276,7 @@ 2007-03-12 Lawrence Mitchell <wence@gmx.li> (tiny change) * tempo.el (tempo-insert): Deal with 'r> if it appears - specified with a prompt argument. + specified with a prompt argument. 2007-03-12 Carsten Dominik <dominik@science.uva.nl>
--- a/lisp/replace.el Mon Mar 26 10:20:27 2007 +0000 +++ b/lisp/replace.el Mon Mar 26 15:09:52 2007 +0000 @@ -844,7 +844,8 @@ #'next-single-property-change) "No more matches") ;; In case the *Occur* buffer is visible in a nonselected window. - (set-window-point (get-buffer-window (current-buffer)) (point)) + (let ((win (get-buffer-window (current-buffer) t))) + (if win (set-window-point win (point)))) (occur-mode-goto-occurrence))) (defface match