summaryrefslogtreecommitdiff
path: root/lisp/vc/vc-bzr.el
diff options
context:
space:
mode:
authorPhilip Kaludercic <philipk@posteo.net>2022-10-23 18:04:55 +0200
committerPhilip Kaludercic <philipk@posteo.net>2022-10-23 18:04:55 +0200
commit2154219059a21d6aad2e7e390187d78029fff3d0 (patch)
tree81573032a66e7f9cd941a22389ecd5d1f5d638b8 /lisp/vc/vc-bzr.el
parenta0532e148cca6fc9ede11fda2c9dda20cac4eca5 (diff)
downloademacs-2154219059a21d6aad2e7e390187d78029fff3d0.tar.gz
Immediately check out the right branch or revision
* lisp/emacs-lisp/package-vc.el (package-vc-unpack) Use REV to avoid checking out the wrong branch/revision first. * lisp/vc/vc-bzr.el: Handle REV. * lisp/vc/vc-git.el: Handle REV. * lisp/vc/vc-hg.el: Handle REV. * lisp/vc/vc-svn.el: Handle REV. * lisp/vc/vc.el: Make BACKEND optional and add REV.
Diffstat (limited to 'lisp/vc/vc-bzr.el')
-rw-r--r--lisp/vc/vc-bzr.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el
index 5e826b9a286..8f00441e816 100644
--- a/lisp/vc/vc-bzr.el
+++ b/lisp/vc/vc-bzr.el
@@ -532,8 +532,10 @@ in the branch repository (or whose status not be determined)."
(add-hook 'after-save-hook #'vc-bzr-resolve-when-done nil t)
(vc-message-unresolved-conflicts buffer-file-name)))
-(defun vc-bzr-clone (remote directory)
- (vc-bzr-command nil 0 '() "branch" remote directory)
+(defun vc-bzr-clone (remote directory rev)
+ (if rev
+ (vc-bzr-command nil 0 '() "branch" "-r" rev remote directory)
+ (vc-bzr-command nil 0 '() "branch" remote directory))
directory)
(defun vc-bzr-version-dirstate (dir)