ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-12 06:06:53 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

git-version: Raise a condition instead of an error.

Browse source 
* guix/git-download.scm (git-version): Replace ERROR with RAISE
  and CONDITION.

This is a follow-up to commit bbf6bc1acc.
This commit is contained in:
Jakub Kądziołka 2020-04-23 14:21:00 +02:00
parent 938df0de73
commit e84d9dcd5b
No known key found for this signature in database
GPG key ID: E315A75846131564
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
guix/git-download.scm
View file

@ -179,7 +179,9 @@ (define (git-version version revision commit)
;; 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)