Mercurial > emacs
changeset 93273:c3bda68eeaa4
(vc-do-command): Don't pop to the buffer if it's an internal temp buffer.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 27 Mar 2008 03:40:36 +0000 |
| parents | be138fb1cf1a |
| children | 177806bc3b1b |
| files | lisp/ChangeLog lisp/vc.el |
| diffstat | 2 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Mar 27 02:52:23 2008 +0000 +++ b/lisp/ChangeLog Thu Mar 27 03:40:36 2008 +0000 @@ -1,3 +1,8 @@ +2008-03-27 Stefan Monnier <monnier@iro.umontreal.ca> + + * vc.el (vc-do-command): Don't pop to the buffer if it's an internal + temp buffer. + 2008-03-27 Glenn Morris <rgm@gnu.org> * calendar/cal-bahai.el (diary-bahai-list-entries):
--- a/lisp/vc.el Thu Mar 27 02:52:23 2008 +0000 +++ b/lisp/vc.el Thu Mar 27 03:40:36 2008 +0000 @@ -1189,9 +1189,10 @@ (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) + (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)" full-command (if (integerp status) (format "status %d" status) status)))) ;; We're done. But don't emit a status message if running