(vc-revert-buffer): In a dedicated solitary window,

make the frame invisible instead of trying to delete window.

diff --git a/lisp/vc.el b/lisp/vc.el
index af950518703dd0dd1bc0e0ff3dcbb8e0b3a2ce85..fa38ca4f0d53b414f31095ab5d2af64a3d34aad5 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1372,11 +1372,17 @@ the file on the branch you are editing."
     (if (and changed (or vc-suppress-confirm
                         (not (yes-or-no-p "Discard changes? "))))
        (progn
-         (delete-window)
+         (if (and (window-dedicated-p (selected-window))
+                  (one-window-p t 'selected-frame))
+             (make-frame-invisible (selected-frame))
+           (delete-window))
          (error "Revert cancelled"))
       (set-buffer obuf))
     (if changed
-       (delete-window))
+       (if (and (window-dedicated-p (selected-window))
+                (one-window-p t 'selected-frame))
+           (make-frame-invisible (selected-frame))
+         (delete-window)))
     (vc-backend-revert file)
     (vc-resynch-window file t t)
     )