[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/git-commit 98bebafa1b: magit-tag-release: Abort if sisyphu
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/git-commit 98bebafa1b: magit-tag-release: Abort if sisyphus-create-release should be used |
Date: |
Fri, 11 Feb 2022 15:58:08 -0500 (EST) |
branch: elpa/git-commit
commit 98bebafa1b77f4376de578fb64557d63318d53fc
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/git-commit 98bebafa1b: magit-tag-release: Abort if sisyphus-create-release should be used,
ELPA Syncer <=