From 405d043ddd46a2ae5dbd68f2487529e805e8fc1f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Tue, 31 May 2016 22:11:51 +0200
Subject: [PATCH] import: github: Tiny cosmetic change.

* guix/import/github.scm (find-extension): Use a one-argument lambda.
---
 guix/import/github.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/import/github.scm b/guix/import/github.scm
index bbf916ceeb5..9ba9a10ba06 100644
--- a/guix/import/github.scm
+++ b/guix/import/github.scm
@@ -43,7 +43,7 @@ (define (json-fetch* url)
 (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))
+  (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)
-- 
GitLab