01/01: import: elpa: Check if 'fetch-elpa-package' rest argument is null.

[Oleg Pykhalov]

wigust pushed a commit to branch master
in repository guix.

commit ae6fa00af02399e2ffadccc81bd7718cc7c26f10
Author: Oleg Pykhalov <address@hidden>
Date:   Sat Jun 30 10:51:45 2018 +0300

    import: elpa: Check if 'fetch-elpa-package' rest argument is null.
    
    * guix/import/elpa.scm (fetch-elpa-package): Check if 'rest' is null.
---
 guix/import/elpa.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/guix/import/elpa.scm b/guix/import/elpa.scm
index 65e0be4..c37afaf 100644
--- a/guix/import/elpa.scm
+++ b/guix/import/elpa.scm
@@ -187,7 +187,9 @@ include VERSION."
              (url (package-source-url kind name ver repo)))
          (make-elpa-package name ver
                             (ensure-list reqs) synopsis kind
-                            (package-home-page (first rest))
+                            (package-home-page (match rest
+                                                 (() #f)
+                                                 ((one) one)))
                             (fetch-package-description kind name repo)
                             url)))
       (_ #f))))