diff options
author | Philip Kaludercic <philipk@posteo.net> | 2022-10-23 18:04:55 +0200 |
---|---|---|
committer | Philip Kaludercic <philipk@posteo.net> | 2022-10-23 18:04:55 +0200 |
commit | 2154219059a21d6aad2e7e390187d78029fff3d0 (patch) | |
tree | 81573032a66e7f9cd941a22389ecd5d1f5d638b8 /lisp/vc/vc-bzr.el | |
parent | a0532e148cca6fc9ede11fda2c9dda20cac4eca5 (diff) | |
download | emacs-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.el | 6 |
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) |