From d6acc9f8fb44dd787a42c767b217318558128627 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Thu, 12 Apr 2018 03:51:19 -0400 Subject: gnu: isc-dhcp: Return #t from all phases. * gnu/packages/admin.scm (isc-dhcp)[arguments]: Use invoke instead of system*, and return #t from all phases. --- gnu/packages/admin.scm | 19 ++++++++++--------- 1 file changed, 10 insertions(+), 9 deletions(-) (limited to 'gnu/packages/admin.scm') diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index d6deceff97..de9ed003dd 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -664,16 +664,16 @@ (define-public isc-dhcp sh " SHELL=" sh)))) (let ((bind-directory (string-append "bind-" ,bind-version))) - (system* "tar" "xf" "bind.tar.gz") + (invoke "tar" "xf" "bind.tar.gz") (for-each patch-shebang (find-files bind-directory ".*")) - (zero? (system* "tar" "cf" "bind.tar.gz" - bind-directory - ;; avoid non-determinism in the archive - "--sort=name" - "--mtime=@0" - "--owner=root:0" - "--group=root:0")))))) + (invoke "tar" "cf" "bind.tar.gz" + bind-directory + ;; avoid non-determinism in the archive + "--sort=name" + "--mtime=@0" + "--owner=root:0" + "--group=root:0"))))) (add-after 'install 'post-install (lambda* (#:key inputs outputs #:allow-other-keys) ;; Install the dhclient script for GNU/Linux and make sure @@ -699,7 +699,8 @@ (define-public isc-dhcp ,(map (lambda (dir) (string-append dir "/bin:" dir "/sbin")) - (list inetutils net-tools coreutils sed)))))))))) + (list inetutils net-tools coreutils sed)))) + #t)))))) (native-inputs `(("perl" ,perl))) -- cgit v1.2.3