diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-06-07 11:54:03 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2016-06-07 11:54:03 +0200 |
| commit | aeafff536f933b07836b14d089dfc52b0e432ec9 (patch) | |
| tree | 4ede554999f98cf9e19c04098c934db52efae795 /guix/import | |
| parent | 9dee9e8ffe4650949bd3ad2edf559cf4a33e9e6e (diff) | |
| parent | f82c58539e1f7b9b864e68ea2ab0c6a17c15fbb5 (diff) | |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/import')
| -rw-r--r-- | guix/import/github.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/import/github.scm b/guix/import/github.scm index 29116d79f0..9ba9a10ba0 100644 --- a/guix/import/github.scm +++ b/guix/import/github.scm @@ -43,8 +43,8 @@ failure." (define (find-extension url) "Return the extension of the archive e.g. '.tar.gz' given a URL, or false if none is recognized" - (find (lambda x (string-suffix? (first x) url)) - (list ".tar.gz" ".tar.bz2" ".tar.xz" ".zip" ".tar"))) + (find (lambda (x) (string-suffix? x url)) + (list ".tar.gz" ".tar.bz2" ".tar.xz" ".zip" ".tar" ".tgz"))) (define (updated-github-url old-package new-version) ;; Return a url for the OLD-PACKAGE with NEW-VERSION. If no source url in |