branch: elpa/git-commit
commit 98bebafa1b77f4376de578fb64557d63318d53fc
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
magit-tag-release: Abort if sisyphus-create-release should be used
I haven't released that package (yet?). If it is not available,
then this change has no effect.
---
lisp/magit-tag.el | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/lisp/magit-tag.el b/lisp/magit-tag.el
index cf53c0acac..7c3fd0cd6c 100644
--- a/lisp/magit-tag.el
+++ b/lisp/magit-tag.el
@@ -170,6 +170,11 @@ like \"/path/to/foo-bar\"."
(msg (magit-rev-format "%s"))
(ver (and (string-match magit-release-commit-regexp msg)
(match-string 1 msg)))
+ (_ (and (not ver)
+ (require (quote sisyphus) nil t)
+ (string-match magit-release-commit-regexp
+ (magit-rev-format "%s" ptag))
+ (user-error "Use `sisyphus-create-release' first")))
(tag (if ver
(concat (and (string-match magit-release-tag-regexp ptag)
(match-string 1 ptag))
