summary refs log tree commit diff
diff options
context:
space:
mode:
authorHartmut Goebel <h.goebel@crazy-compilers.com>2022-06-28 21:07:05 +0200
committerHartmut Goebel <h.goebel@crazy-compilers.com>2022-06-30 11:29:17 +0200
commitb73e85186a8c08dac568c12b134af1c8bd0d16b6 (patch)
tree75c23a98467e13b0b96d5ed2046a2f42b5e92e50
parent66c23a524c83c6c9f547b57cac1f1350b1507c97 (diff)
downloadguix-b73e85186a8c08dac568c12b134af1c8bd0d16b6.tar.gz
egg
-rw-r--r--guix/import/egg.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/import/egg.scm b/guix/import/egg.scm
index 52196583c4..e4289618cb 100644
--- a/guix/import/egg.scm
+++ b/guix/import/egg.scm
@@ -2,6 +2,7 @@
 ;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
 ;;; Copyright © 2021 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2021 Sarah Morgensen <iskarian@mgsn.dev>
+;;; Copyright © 2022 Hartmut Goebel <h.goebel@crazy-compilers.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -333,10 +334,10 @@ not work."
 ;;; Updater.
 ;;;
 
-(define (latest-release package)
+(define* (latest-release package #:key (version #f))
   "Return an @code{<upstream-source>} for the latest release of PACKAGE."
   (let* ((egg-name (guix-package->egg-name package))
-         (version (find-latest-version egg-name))
+         (version (or version (find-latest-version egg-name)))
          (source-url (egg-uri egg-name version)))
     (upstream-source
      (package (package-name package))