`magit-tag' now knows about revisions.

This commit is contained in:
Phil Jackson 2010-05-19 23:22:03 +01:00
parent 0241232622
commit dc9c1178fd

View file

@ -3266,12 +3266,14 @@ Prefix arg means justify as well."
;;; Tags ;;; Tags
(defun magit-tag (name) (defun magit-tag (name rev)
"Creates a new lightweight tag with the given NAME. "Creates a new lightweight tag with the given NAME at REV.
Tag will point to the current 'HEAD'.
\('git tag NAME')." \('git tag NAME')."
(interactive "sNew tag name: ") (interactive
(magit-run-git "tag" name)) (list
(read-string "Tag name: ")
(magit-read-rev "Place tag on: " (or (magit-default-rev) "HEAD"))))
(magit-run-git "tag" name rev))
(defun magit-annotated-tag (name) (defun magit-annotated-tag (name)
"Start composing an annotated tag with the given NAME. "Start composing an annotated tag with the given NAME.