From 602f54f436d41634adaa56e4ff645a6bad202daf Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Tue, 27 Feb 2018 20:36:58 +0100 Subject: [PATCH] gnu: java-jnacl: Use invoke. * gnu/packages/java.scm (java-jnacl)[arguments]: Use "invoke". --- gnu/packages/java.scm | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm index 7a90bfba00..bc2fb32eba 100644 --- a/gnu/packages/java.scm +++ b/gnu/packages/java.scm @@ -7538,18 +7538,18 @@ (define-public java-jnacl #t)) (replace 'check (lambda _ - (system* "ant" "compile-tests") - (and - (zero? (system* "java" "-cp" (string-append (getenv "CLASSPATH") - ":build/classes" - ":build/test-classes") - "org.testng.TestNG" "-testclass" - "build/test-classes/com/neilalexander/jnacl/NaclSecretBoxTest.class")) - (zero? (system* "java" "-cp" (string-append (getenv "CLASSPATH") - ":build/classes" - ":build/test-classes") - "org.testng.TestNG" "-testclass" - "build/test-classes/com/neilalexander/jnacl/NaClTest.class")))))))) + (invoke "ant" "compile-tests") + (invoke "java" "-cp" (string-append (getenv "CLASSPATH") + ":build/classes" + ":build/test-classes") + "org.testng.TestNG" "-testclass" + "build/test-classes/com/neilalexander/jnacl/NaclSecretBoxTest.class") + (invoke "java" "-cp" (string-append (getenv "CLASSPATH") + ":build/classes" + ":build/test-classes") + "org.testng.TestNG" "-testclass" + "build/test-classes/com/neilalexander/jnacl/NaClTest.class") + #t))))) (native-inputs `(("java-testng" ,java-testng) ("java-fest-util" ,java-fest-util)