me
/
guix
Archived
1
0
Fork 0
Code

import: github: Use correct URL scheme. 

This effects packages hosted at github with source-uri like
…/releases/download/REPO-VERSION/REPO-VERSION.EXT.
E.g. ‘guix refresh udisks’ would fail to find the new release of ‘udisks’
before this change.

* guix/import/github.scm(updated-url): For one one of the
  cases add missing 'prefix' and set new version.
master
Hartmut Goebel 2022-06-29 12:54:38 +02:00
parent e0e87fe3a6
commit e8cd9e3d12
No known key found for this signature in database
GPG Key ID: 634A8DFFD3F631DF
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
guix/import/github.scm
View File

@ -5,6 +5,7 @@
;;; Copyright © 2019 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2019 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be> ;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be>
;;; Copyright © 2022 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -95,8 +96,8 @@ false if none is recognized"
((string-suffix? (string-append "/releases/download/" repo "-" ((string-suffix? (string-append "/releases/download/" repo "-"
version "/" repo "-" version ext) version "/" repo "-" version ext)
url) url)
(string-append "/releases/download/" repo "-" version "/" repo "-" (string-append prefix "/releases/download/" repo "-" new-version "/"
version ext)) repo "-" new-version ext))
(#t #f))) ; Some URLs are not recognised. (#t #f))) ; Some URLs are not recognised.
#f)) #f))