[Emacs-diffs] Changes to emacs/lisp/net/tramp-vc.el

[Kai Großjohann]

Index: emacs/lisp/net/tramp-vc.el
diff -c emacs/lisp/net/tramp-vc.el:1.9 emacs/lisp/net/tramp-vc.el:1.10
*** emacs/lisp/net/tramp-vc.el:1.9      Sat Jul 17 17:28:06 2004
--- emacs/lisp/net/tramp-vc.el  Sat Oct 23 19:52:18 2004
***************
*** 217,222 ****
--- 217,223 ----
  ;; Daniel Pittman <address@hidden>
  ;;-(if (fboundp 'vc-call-backend)
  ;;-    () ;; This is the new VC for which we don't have an appropriate advice 
yet
+ (unless (fboundp 'process-file)
  (if (fboundp 'vc-call-backend)
      (defadvice vc-do-command
        (around tramp-advice-vc-do-command
***************
*** 242,248 ****
            (setq ad-return-value
                  (apply 'tramp-vc-do-command buffer okstatus command 
                         (or file (buffer-file-name)) last flags))
!         ad-do-it))))
  ;;-)
  
  
--- 243,249 ----
            (setq ad-return-value
                  (apply 'tramp-vc-do-command buffer okstatus command 
                         (or file (buffer-file-name)) last flags))
!         ad-do-it)))))
  ;;-)