From: Stefan Monnier Date: Thu, 27 Mar 2008 03:40:36 +0000 (+0000) Subject: (vc-do-command): Don't pop to the buffer if it's an internal temp buffer. X-Git-Tag: emacs-pretest-23.0.90~6875 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f42d59a5d7839eb5990c5325392ce4e5d39d6550;p=emacs.git (vc-do-command): Don't pop to the buffer if it's an internal temp buffer. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0449d7aa6fb..24f0c7d6da6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-03-27 Stefan Monnier + + * vc.el (vc-do-command): Don't pop to the buffer if it's an internal + temp buffer. + 2008-03-27 Glenn Morris * calendar/cal-bahai.el (diary-bahai-list-entries): diff --git a/lisp/vc.el b/lisp/vc.el index 0e633f5f993..e3316dce1bd 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -1189,9 +1189,10 @@ that is inserted into the command line before the filename." (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