~ruther/guix-local

e3cc793e7c5a71189564f11ce825735b008871b6 — Ludovic Courtès 10 years ago 202440e
gnu-maintenance: Do not look for releases in "w32" sub-directories.

* guix/gnu-maintenance.scm (latest-release): Filter out "w32"
directories.
1 files changed, 4 insertions(+), 1 deletions(-)

M guix/gnu-maintenance.scm
M guix/gnu-maintenance.scm => guix/gnu-maintenance.scm +4 -1
@@ 354,11 354,14 @@ open (resp. close) FTP connections; this can be useful to reuse connections."
      (let* ((entries (ftp-list conn directory))

             ;; Filter out sub-directories that do not contain digits---e.g.,
             ;; /gnuzilla/lang and /gnupg/patches.
             ;; /gnuzilla/lang and /gnupg/patches.  Filter out "w32"
             ;; directories as found on ftp.gnutls.org.
             (subdirs (filter-map (match-lambda
                                    (((? patch-directory-name? dir)
                                      'directory . _)
                                     #f)
                                    (("w32" 'directory . _)
                                     #f)
                                    (((? contains-digit? dir) 'directory . _)
                                     dir)
                                    (_ #f))