From 2cdc719193a2f77cf972219bd4f50eb152fb575f Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 1 Apr 2018 07:44:15 +0200
Subject: gnu: surfraw: Use INVOKE.

* gnu/packages/web.scm (surfraw)[arguments]: Substitute INVOKE for
SYSTEM*.
---
 gnu/packages/web.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 5776363b75..0fe9c5bdec 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -4786,7 +4786,7 @@ (define-public surfraw
              (let* ((out (assoc-ref %outputs "out"))
                     (man (string-append out "/share/man/man1")))
                (with-directory-excursion man
-                 (zero? (system* "gzip" "elvi.1sr")))))))))
+                 (invoke "gzip" "elvi.1sr"))))))))
     (inputs
      `(("perl" ,perl)
        ("perl-www-opensearch" ,perl-www-opensearch)
-- 
cgit v1.2.3