From 5453de3dd88f28d5b3e7cff96df2c583e57bb23b Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Wed, 4 Nov 2015 23:54:12 +0100
Subject: import: hackage: Fix invalid use of 'leave'.

Reported by Paul van der Walt <paul@denknerd.org>
in <http://bugs.gnu.org/21829>.

* guix/scripts/import/hackage.scm (guix-import-hackage): Add missing
  argument in call to 'leave'.
---
 guix/scripts/import/hackage.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'guix')

diff --git a/guix/scripts/import/hackage.scm b/guix/scripts/import/hackage.scm
index 8c4e640bf3..97d042be3e 100644
--- a/guix/scripts/import/hackage.scm
+++ b/guix/scripts/import/hackage.scm
@@ -134,9 +134,9 @@ (define (run-importer package-name opts error-fn)
           ((package-name)
            (run-importer package-name opts
                          (lambda ()
-                           (leave
-                            (_ "failed to download cabal file for package '~a'~%"))
-                           package-name)))
+                           (leave (_ "failed to download cabal file \
+for package '~a'~%")
+                                  package-name))))
           (()
            (leave (_ "too few arguments~%")))
           ((many ...)
-- 
cgit v1.2.3