aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong <[email protected]>2011-12-21 15:46:49 +0800
committerChong Yidong <[email protected]>2011-12-21 15:46:49 +0800
commitbc86f573eecb9067dfb73c612309a909332bb15d (patch)
tree03a0dfbfe136879a4cbb90355d41fef840e1070f
parent678f4426c3e42029becee680b99f31d5cd254626 (diff)
* vc-bzr.el (vc-bzr-rename-file): Don't pass ~ to Bzr in filename arg.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/vc/vc-bzr.el5
2 files changed, 9 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 01c03c2baf..27e8bcd0ad 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-12-21 Chong Yidong <[email protected]>
+
+ * vc/vc-bzr.el (vc-bzr-rename-file): Don't pass ~ to Bzr in
+ filename argument.
+
2011-12-20 Martin Rudalics <[email protected]>
* window.el (window-normalize-buffer-to-display): Remove.
diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el
index c5c0ce73b3..508420f026 100644
--- a/lisp/vc/vc-bzr.el
+++ b/lisp/vc/vc-bzr.el
@@ -764,7 +764,10 @@ REV non-nil gets an error."
(defun vc-bzr-rename-file (old new)
"Rename file from OLD to NEW using `bzr mv'."
- (vc-bzr-command "mv" nil 0 new old))
+ (setq old (expand-file-name old))
+ (setq new (expand-file-name new))
+ (vc-bzr-command "mv" nil 0 new old)
+ (message "Renamed %s => %s" old new))
(defvar vc-bzr-annotation-table nil
"Internal use.")