From b7fd3e96c7b6ccf7f6f9949b5a263753b4fee50e Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 18 Feb 2018 19:32:48 +0100
Subject: [PATCH] gnu: lsof: Update phase style.

* gnu/packages/lsof.scm (lsof)[arguments]: Substitute INVOKE for SYSTEM*
and end phases with #t.
---
 gnu/packages/lsof.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/lsof.scm b/gnu/packages/lsof.scm
index f9e9759cf2..fcd5c2e1c7 100644
--- a/gnu/packages/lsof.scm
+++ b/gnu/packages/lsof.scm
@@ -69,7 +69,8 @@
           (lambda _
             (setenv "LSOF_CC" "gcc")
             (setenv "LSOF_MAKE" "make")
-            (zero? (system* "./Configure" "linux"))))
+            (invoke "./Configure" "linux")
+            #t))
         (replace 'install
           (lambda* (#:key outputs #:allow-other-keys)
             (let ((out (assoc-ref outputs "out")))