1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

import: hexpm: Allow updating to a specific version.

* guix/import/hexpm.scm (latest-release): Rename to 'import-release',
  add #:version argument.
  If version is given, return an upstream-source for this version.
This commit is contained in:
Hartmut Goebel
2022-06-29 09:39:51 +02:00
parent c7faeae2b1
commit e689f97033

View File

@@ -328,11 +328,12 @@ latest version of PACKAGE-NAME."
;;; Updater
;;;
(define (latest-release package)
"Return an <upstream-source> for the latest release of PACKAGE."
(define* (import-release package #:key (version #f))
"Return an <upstream-source> for the latest release of PACKAGE. Optionally
include a VERSION string to fetch a specific version."
(let* ((hexpm-name (guix-package->hexpm-name package))
(hexpm (lookup-hexpm hexpm-name))
(version (hexpm-latest-release hexpm))
(version (or version (hexpm-latest-release hexpm)))
(url (hexpm-uri hexpm-name version)))
(upstream-source
(package (package-name package))
@@ -344,4 +345,4 @@ latest version of PACKAGE-NAME."
(name 'hexpm)
(description "Updater for hex.pm packages")
(pred (url-prefix-predicate hexpm-package-url))
(import latest-release)))
(import import-release)))