12/17: gnu: vpnc-scripts: Return #t from all phases.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 863501b723adc496d49ee329c035648020f43b2f
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Thu Jun 21 19:26:20 2018 +0200

    gnu: vpnc-scripts: Return #t from all phases.
    
    * gnu/packages/vpn.scm (vpnc-scripts)[arguments]: Substitute INVOKE for
    SYSTEM*. Return #t rather than undefined from phases.
---
 gnu/packages/vpn.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/vpn.scm b/gnu/packages/vpn.scm
index fb06196..5043265 100644
--- a/gnu/packages/vpn.scm
+++ b/gnu/packages/vpn.scm
@@ -161,7 +161,7 @@ Only \"Universal TUN/TAP device driver support\" is needed 
in the kernel.")
            (delete 'configure)          ; no configure script
            (replace 'build
              (lambda _
-               (zero? (system* "gcc" "-o" "netunshare" "netunshare.c"))))
+               (invoke "gcc" "-o" "netunshare" "netunshare.c")))
            (replace 'install
              ;; There is no Makefile; manually install the relevant files.
              (lambda* (#:key outputs #:allow-other-keys)
@@ -193,7 +193,8 @@ Only \"Universal TUN/TAP device driver support\" is needed 
in the kernel.")
                                     "sed"
                                     "which")))))
                   (find-files (string-append out "/etc/vpnc/vpnc-script")
-                              "^vpnc-script"))))))
+                              "^vpnc-script"))
+                 #t))))
          #:tests? #f))                  ; no tests
       (home-page "http://git.infradead.org/users/dwmw2/vpnc-scripts.git";)
       (synopsis "Network configuration scripts for Cisco VPN clients")