emacs-elpa-diffs
[Top][All Lists]
Advanced

[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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]