Bug in vc-svn

[Leo]

Dear all,

I have just noted that the latest changes to vc-svn have caused the
following code to behave weirdly:

(add-hook 'log-edit-mode-hook 'my-vc-diff-other-window)
(defun my-vc-diff-other-window ()
  "Display diffs between file versions, in another window."
  (let (vc-diff-buffer)
    (when (vc-backend (buffer-file-name vc-parent-buffer))
      (save-window-excursion
        (vc-diff nil t)
        (setq vc-diff-buffer (current-buffer)))
      (display-buffer vc-diff-buffer t))))

Now if you open a file under svn control and trying to check in changes
by "C-x v v", you can see that the *VC-log* is shrunk to very small. I
can also confirm that this does not happen with RCS etc.

HTH,
-- 
Leo <sdl.web AT gmail.com>                         (GPG Key: 9283AA3F)