Restore vc-revision-other-window buffer-changing behaviour

* lisp/vc/vc.el (vc-revision-other-window): This function used to
change the current buffer, but this was changed in the previous
patch for indirect buffer support.  Ensure that it still does
this, because this is what the callers expect (bug#44026).

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 46c44fa54b77cfad0560a65f41f4338af8423269..39d0fab391d5d2a4434abcb53d8d0a36f0a33361 100644 (file)
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -2058,13 +2058,13 @@ If `F.~REV~' already exists, use it instead of checking it out again."
      (list
       (vc-read-revision "Revision to visit (default is working revision): "
                         (list buffer-file-name)))))
-  (with-current-buffer (or (buffer-base-buffer) (current-buffer))
-    (vc-ensure-vc-buffer)
-    (let* ((file buffer-file-name)
-          (revision (if (string-equal rev "")
-                        (vc-working-revision file)
-                      rev)))
-      (switch-to-buffer-other-window (vc-find-revision file revision)))))
+  (set-buffer (or (buffer-base-buffer) (current-buffer)))
+  (vc-ensure-vc-buffer)
+  (let* ((file buffer-file-name)
+        (revision (if (string-equal rev "")
+                      (vc-working-revision file)
+                    rev)))
+    (switch-to-buffer-other-window (vc-find-revision file revision))))
 
 (defun vc-find-revision (file revision &optional backend)
   "Read REVISION of FILE into a buffer and return the buffer.