emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/vc-arch.el [lexbind]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/vc-arch.el [lexbind]
Date: Tue, 06 Jul 2004 06:01:05 -0400

Index: emacs/lisp/vc-arch.el
diff -c emacs/lisp/vc-arch.el:1.3.2.3 emacs/lisp/vc-arch.el:1.3.2.4
*** emacs/lisp/vc-arch.el:1.3.2.3       Tue Apr 13 10:16:17 2004
--- emacs/lisp/vc-arch.el       Tue Jul  6 09:31:50 2004
***************
*** 375,381 ****
      (vc-arch-command nil 0 file "commit" "-s" summary "-L" comment "--"
                     (vc-switches 'Arch 'checkin))))
  
! (defun vc-arch-diff (file &optional oldvers newvers)
    "Get a difference report using Arch between two versions of FILE."
    (if (and newvers
           (vc-up-to-date-p file)
--- 375,381 ----
      (vc-arch-command nil 0 file "commit" "-s" summary "-L" comment "--"
                     (vc-switches 'Arch 'checkin))))
  
! (defun vc-arch-diff (file &optional oldvers newvers buffer)
    "Get a difference report using Arch between two versions of FILE."
    (if (and newvers
           (vc-up-to-date-p file)
***************
*** 390,396 ****
           (default-directory (vc-arch-root file))
           (status
            (vc-arch-command
!            "*vc-diff*"
             (if async 'async 1)
             nil "file-diffs"
             ;; Arch does not support the typical flags.
--- 390,396 ----
           (default-directory (vc-arch-root file))
           (status
            (vc-arch-command
!            (or buffer "*vc-diff*")
             (if async 'async 1)
             nil "file-diffs"
             ;; Arch does not support the typical flags.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]