diff options
| author | Chong Yidong <[email protected]> | 2011-12-21 15:46:49 +0800 |
|---|---|---|
| committer | Chong Yidong <[email protected]> | 2011-12-21 15:46:49 +0800 |
| commit | bc86f573eecb9067dfb73c612309a909332bb15d (patch) | |
| tree | 03a0dfbfe136879a4cbb90355d41fef840e1070f /lisp/vc | |
| parent | 678f4426c3e42029becee680b99f31d5cd254626 (diff) | |
* vc-bzr.el (vc-bzr-rename-file): Don't pass ~ to Bzr in filename arg.
Diffstat (limited to 'lisp/vc')
| -rw-r--r-- | lisp/vc/vc-bzr.el | 5 |
1 files changed, 4 insertions, 1 deletions
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.") |