From ae6fa00af02399e2ffadccc81bd7718cc7c26f10 Mon Sep 17 00:00:00 2001 From: Oleg Pykhalov Date: Sat, 30 Jun 2018 10:51:45 +0300 Subject: 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 65e0be45ab..c37afaf8e6 100644 --- a/guix/import/elpa.scm +++ b/guix/import/elpa.scm @@ -187,7 +187,9 @@ (define* (fetch-elpa-package name #:optional (repo 'gnu)) (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)))) -- cgit v1.2.3