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)