guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

13/31: gnu: krona-tools: Use INVOKE.


From: Tobias Geerinckx-Rice
Subject: 13/31: gnu: krona-tools: Use INVOKE.
Date: Wed, 30 May 2018 22:55:34 -0400 (EDT)

nckx pushed a commit to branch master
in repository guix.

commit aa0771556e827b0f67a564082bedf8a573e8f73e
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Sun Apr 1 07:38:24 2018 +0200

    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(-)

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 0cd6c01..c37f70e 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";)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]