diff options
| -rw-r--r-- | guix/gnu-maintenance.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm index 7f7fafd569..dcb7f3b61a 100644 --- a/guix/gnu-maintenance.scm +++ b/guix/gnu-maintenance.scm @@ -801,7 +801,9 @@ list available from %GNU-FILE-LIST-URI over HTTP(S)." (find (cut version-prefix? version <>) (force versions))) version - (first (force versions)))) + (match (force versions) + ((? null?) #f) + (lst (first lst))))) ;; Find tarballs matching this version. (tarballs (filter (lambda (file) (string=? version (tarball->version file))) |