Mercurial > emacs

changeset 55553:1efb9d658114

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(compilation-set-window-height): Use save-excursion to protect against misplaced marker.
author Daniel Pfeiffer <occitan@esperanto.org>
date Wed, 12 May 2004 18:45:08 +0000
parents dc9bd6dd0d8d
children 3ea194b43727
files lisp/progmodes/compile.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/compile.el	Wed May 12 14:39:34 2004 +0000
+++ b/lisp/progmodes/compile.el	Wed May 12 18:45:08 2004 +0000
@@ -990,8 +990,9 @@
 	 ;; buffer, which might not be the same as the selected window's buffer.
 	 (save-current-buffer
 	   (save-selected-window
-	     (select-window window)
-	     (enlarge-window (- height (window-height))))))))
+	     (save-excursion
+	       (select-window window)
+	       (enlarge-window (- height (window-height)))))))))
 
 (defvar compilation-menu-map
   (let ((map (make-sparse-keymap "Errors")))