~ruther/guix-local: gnu-maintenance: Correctly compare versions.

e9f38113908414792ce2e5c1d3203cc8e5cb938b — Ludovic Courtès 8 years ago 21c2757

gnu-maintenance: Correctly compare versions.

* guix/gnu-maintenance.scm (latest-gnu-release): Add calls to
'sans-extension'.  This fixes version comparison, which could be fooled
with the ".tar.gz" extension.

patch browse .tar.gz

1 files changed, 3 insertions(+), 3 deletions(-)

M guix/gnu-maintenance.scm

M guix/gnu-maintenance.scm => guix/gnu-maintenance.scm +3 -3

@@ 472,11 472,11 @@ list available from %GNU-FILE-LIST-URI over HTTP(S)."
     (let* ((files    (ftp.gnu.org-files))
            (relevant (filter (lambda (file)
                                (and (string-contains file directory)
-                                    (release-file? name (basename file))
-                                    ))
+                                    (release-file? name (basename file))))
                              files)))
       (match (sort relevant (lambda (file1 file2)
-                              (version>? (basename file1) (basename file2))))
+                              (version>? (sans-extension (basename file1))
+                                         (sans-extension (basename file2)))))
         ((tarball _ ...)
          (upstream-source
           (package name)