guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

09/18: gnu-maintenance: Simplify latest-kernel.org-release.


From: guix-commits
Subject: 09/18: gnu-maintenance: Simplify latest-kernel.org-release.
Date: Mon, 26 Sep 2022 17:32:10 -0400 (EDT)

civodul pushed a commit to branch master
in repository guix.

commit d9b8169a9f3cd5bcafcd2f85af7c7c876272c540
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Thu Sep 1 11:01:54 2022 +0200

    gnu-maintenance: Simplify latest-kernel.org-release.
    
    As latest-html-release now produces mirror:// URIs where possible,
    the additional post-processing is not necessary anymore.
    
    As a test, revert the dtc package back to 1.6.0 and try updating 'gash',
    the mirror:// URI remains.
    
    * gnu-maintenance.scm (latest-kernel.org-release): Do not call
    adjusted-upstream-source on the result.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 guix/gnu-maintenance.scm | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index cb774d2ed6..824762695c 100644
--- a/guix/gnu-maintenance.scm
+++ b/guix/gnu-maintenance.scm
@@ -791,14 +791,11 @@ GNOME packages; EMMS is included though, because its 
releases are on gnu.org."
                        ((? string? uri) uri)
                        ((uri mirrors ...) uri))))
          (package   (package-upstream-name package))
-         (directory (dirname (uri-path uri)))
-         (rewrite   (url-prefix-rewrite %kernel.org-base
-                                        "mirror://kernel.org")))
-    (and=> (latest-html-release package
-                                #:base-url %kernel.org-base
-                                #:directory directory
-                                #:file->signature file->signature)
-           (cut adjusted-upstream-source <> rewrite))))
+         (directory (dirname (uri-path uri))))
+    (latest-html-release package
+                         #:base-url %kernel.org-base
+                         #:directory directory
+                         #:file->signature file->signature)))
 
 (define html-updatable-package?
   ;; Return true if the given package may be handled by the generic HTML



reply via email to

[Prev in Thread] Current Thread [Next in Thread]