Mercurial > emacs
changeset 80398:1a844d29f8e3
(vc-do-command): Don't show internal temp buffers.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sat, 29 Mar 2008 19:37:56 +0000 |
parents | 9f51ca9e6082 |
children | 780cad93de3d |
files | lisp/ChangeLog lisp/vc.el |
diffstat | 2 files changed, 18 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sat Mar 29 00:48:57 2008 +0000 +++ b/lisp/ChangeLog Sat Mar 29 19:37:56 2008 +0000 @@ -1,3 +1,7 @@ +2008-03-29 Stefan Monnier <monnier@iro.umontreal.ca> + + * vc.el (vc-do-command): Don't show internal temp buffers. + 2008-03-29 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> * term/mac-win.el (mac-ae-reopen-application): New function. @@ -17,8 +21,8 @@ 2008-03-23 Andreas Schwab <schwab@suse.de> - * menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: Fix - radio button condition. + * menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: + Fix radio button condition. [box]: Likewise. [customize]: Add radio button. @@ -30,8 +34,8 @@ 2008-03-19 Wilson Snyder <wsnyder@wsnyder.org> - * progmodes/verilog-mode.el (verilog-easy-menu-filter): New - function. + * progmodes/verilog-mode.el (verilog-easy-menu-filter): + New function. (verilog-stmt-menu, verilog-menu): Add :help. (verilog-customize, verilog-font-customize) (electric-verilog-backward-sexp, electric-verilog-forward-sexp) @@ -39,8 +43,8 @@ (verilog-auto-search-do, verilog-auto-re-search-do) (verilog-skip-forward-comment-or-string): Fix verilog-auto expansion when a .* appears inside a string. - (verilog-re-search-forward, verilog-re-search-backward): Add - comment to recall how this works. + (verilog-re-search-forward, verilog-re-search-backward): + Add comment to recall how this works. 2008-03-19 Reiner Steib <Reiner.Steib@gmx.de>
--- a/lisp/vc.el Sat Mar 29 00:48:57 2008 +0000 +++ b/lisp/vc.el Sat Mar 29 19:37:56 2008 +0000 @@ -1047,9 +1047,14 @@ (when (and (not (eq t okstatus)) (or (not (integerp status)) (and okstatus (< okstatus status)))) - (pop-to-buffer (current-buffer)) - (goto-char (point-min)) - (shrink-window-if-larger-than-buffer) + ;; Don't show internal temp buffers. Especially since, together + ;; with with-temp-buffer and pop-up-frames, this can result in + ;; bugs where with-temp-buffer ends up not preserving + ;; current-buffer (because kill-buffer doesn't preserve it). + (unless (eq ?\s (aref (buffer-name (current-buffer)) 0)) + (pop-to-buffer (current-buffer)) + (goto-char (point-min)) + (shrink-window-if-larger-than-buffer)) (error "Running %s...FAILED (%s)" command (if (integerp status) (format "status %d" status) status)))) (if vc-command-messages