diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2020-04-24 17:28:11 +0200 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2020-04-24 17:28:11 +0200 |
| commit | c57d649de380da890f296428b85564cbc527bbad (patch) | |
| tree | 79e9c0b5407aea91c421f7004a0da7bb1e207ba4 /guix/git-download.scm | |
| parent | 69c2e0103ab64aa6e0beb7651797de9cfd22a6d7 (diff) | |
| parent | 9b42918edd3f7e9d505c874d3947c0a0815fe551 (diff) | |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/git-download.scm')
| -rw-r--r-- | guix/git-download.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/git-download.scm b/guix/git-download.scm index ef0bb2e281..a1c1adf760 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) |