From aa0771556e827b0f67a564082bedf8a573e8f73e Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 1 Apr 2018 07:38:24 +0200
Subject: gnu: krona-tools: Use INVOKE.

* gnu/packages/web.scm (krona-tools)[arguments]: Substitute INVOKE for
SYSTEM*.
---
 gnu/packages/web.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'gnu')

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 0cd6c01d03..c37f70eb28 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -690,8 +690,8 @@ instances, while JSON's objects will be mapped to @code{QVariantMap}.")
          (add-after 'wrap-program 'check
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (with-directory-excursion "data"
-               (zero? (system* (string-append (assoc-ref outputs "out") "/bin/ktImportText")
-                               "ec.tsv"))))))))
+               (invoke (string-append (assoc-ref outputs "out") "/bin/ktImportText")
+                       "ec.tsv")))))))
    (inputs
     `(("perl" ,perl)))
    (home-page "https://github.com/marbl/Krona/wiki")
-- 
cgit v1.2.3