Mercurial > emacs
diff lisp/vc-dispatcher.el @ 108002:c609e6e60b3d
* vc-dispatcher (vc-finish-logentry): Don't mess with the windows/frames.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 20 Apr 2010 12:52:43 -0400 |
parents | 2b2a771fc89b |
children | 17d3324f96dd |
line wrap: on
line diff
--- a/lisp/vc-dispatcher.el Tue Apr 20 12:37:31 2010 -0400 +++ b/lisp/vc-dispatcher.el Tue Apr 20 12:52:43 2010 -0400 @@ -599,8 +599,7 @@ (log-extra vc-log-extra) (log-entry (buffer-string)) (extra-flags log-edit-extra-flags) - (after-hook vc-log-after-operation-hook) - (tmp-vc-parent-buffer vc-parent-buffer)) + (after-hook vc-log-after-operation-hook)) (pop-to-buffer vc-parent-buffer) ;; OK, do it to it (save-excursion @@ -617,9 +616,11 @@ (delete-windows-on logbuf (selected-frame)) ;; Kill buffer and delete any other dedicated windows/frames. (kill-buffer logbuf)) - (logbuf (pop-to-buffer logbuf) - (bury-buffer) - (pop-to-buffer tmp-vc-parent-buffer))) + (logbuf + (with-selected-window (or (get-buffer-window logbuf 0) + (selected-window)) + (with-current-buffer logbuf + (bury-buffer))))) ;; Now make sure we see the expanded headers (when log-fileset (mapc