[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
branch master updated: git-version: Raise a condition instead of an erro
From: |
guix-commits |
Subject: |
branch master updated: git-version: Raise a condition instead of an error. |
Date: |
Thu, 23 Apr 2020 08:26:33 -0400 |
This is an automated email from the git hooks/post-receive script.
niedzejkob pushed a commit to branch master
in repository guix.
The following commit(s) were added to refs/heads/master by this push:
new e84d9dc git-version: Raise a condition instead of an error.
e84d9dc is described below
commit e84d9dcd5b80fbacc2853bde53cf0e2da572beb5
Author: Jakub Kądziołka <address@hidden>
AuthorDate: Thu Apr 23 14:21:00 2020 +0200
git-version: Raise a condition instead of an error.
* guix/git-download.scm (git-version): Replace ERROR with RAISE
and CONDITION.
This is a follow-up to commit bbf6bc1acc9bbdebf7ee7b68c0fa091733a5f6e1.
---
guix/git-download.scm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/guix/git-download.scm b/guix/git-download.scm
index ef0bb2e..a1c1adf 100644
--- a/guix/git-download.scm
+++ b/guix/git-download.scm
@@ -179,7 +179,9 @@ HASH-ALGO (a symbol). Use NAME as the file name, or a
generic name if #f."
;; can happen, for example, when the user swapped the revision and commit
;; arguments by mistake.
(when (< (string-length commit) 7)
- (error "git-version: commit ID unexpectedly short"))
+ (raise
+ (condition
+ (&message (message "git-version: commit ID unexpectedly short")))))
(string-append version "-" revision "." (string-take commit 7)))
(define (git-file-name name version)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- branch master updated: git-version: Raise a condition instead of an error.,
guix-commits <=