branch: externals/vc-jj
commit f59dc8fcaa2349881ba154db7fd429d1a5bb2346
Author: Wojciech Siewierski <[email protected]>
Commit: Wojciech Siewierski <[email protected]>
Implement vc-rename-file to fix interop with dired-vc-rename-file
---
vc-jj.el | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/vc-jj.el b/vc-jj.el
index 1af2145ca3..cd3dbc1d63 100644
--- a/vc-jj.el
+++ b/vc-jj.el
@@ -100,6 +100,13 @@
;; No action needed.
)
+(defun vc-jj-delete-file (file)
+ (when (file-exists-p file)
+ (delete-file file)))
+
+(defun vc-jj-rename-file (old new)
+ (rename-file old new))
+
(defun vc-jj-checkin (files comment &optional _rev)
(setq comment (replace-regexp-in-string "\\`Summary: " "" comment))
(let ((args (append (vc-switches 'jj 'checkin) (list "--") files)))
