Below is a patch that replaces dvc-diff-rm with dvc-remove-files in
the dvc diff mode.
dvc-diff-rm calls tla-rm directly. dvc-remove-files dispatches to the
current backend.
dvc-diff-rm should probably be deleted, but I didn't check to see if
it is used elsewhere.
--
-- Stephe
=== modified file 'lisp/dvc-diff.el'
--- lisp/dvc-diff.el 2007-03-26 19:22:55 +0000
+++ lisp/dvc-diff.el 2007-04-07 21:51:57 +0000
@@ -1,6 +1,6 @@
;;; dvc-diff.el --- A generic diff mode for DVC
-;; Copyright (C) 2005-2006 by all contributors
+;; Copyright (C) 2005-2007 by all contributors
;; Author: Matthieu Moy <[EMAIL PROTECTED]>
;; Contributions from:
@@ -95,11 +95,12 @@
(defvar dvc-diff-cookie nil
"Ewoc cookie for the changes buffer.
-Element should look like
+Element should look like one of:
(file \"filename\" \"[CRADP?]\" \"M\" \"/\" \"origname\")
(subtree \"name\" related-buffer changes?)
(message \"doing such or such thing\")")
+;; FIXME: what do these fields mean?
(defun dvc-diff-printer (elem)
"Ewoc pretty-printer for `dvc-diff-cookie'.
@@ -166,7 +167,7 @@
(define-key map dvc-keyvec-previous 'dvc-diff-prev)
(define-key map dvc-keyvec-revert 'dvc-revert-files)
(define-key map dvc-keyvec-quit 'dvc-buffer-quit)
- (define-key map [?d] 'dvc-diff-rm)
+ (define-key map [?d] 'dvc-remove-files)
(define-key map dvc-keyvec-mark 'dvc-diff-mark-file)
(define-key map dvc-keyvec-unmark 'dvc-diff-unmark-file)
(define-key map [?v] 'dvc-diff-view-source)
@@ -206,7 +207,7 @@
["View Diff in Separate Buffer" dvc-diff-diff t]
["View Diff with Ediff" dvc-diff-ediff t]
"--"
- ["Delete File" dvc-diff-rm t]
+ ["Delete File" dvc-remove-files t]
["Revert File" dvc-revert-files t]
)
"Used both in the global and the context menu of `dvc-diff-mode'.")
_______________________________________________
Dvc-dev mailing list
[email protected]
https://mail.gna.org/listinfo/dvc-dev
