me/guix
Archived
1
0
Fork 0
Code Activity

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

Browse source 
* gnu/packages/vpn.scm (vpnc-scripts)[arguments]: Substitute INVOKE for
SYSTEM*. Return #t rather than undefined from phases.
This commit is contained in:
Tobias Geerinckx-Rice 2018-06-21 19:26:20 +02:00
parent 2cd8e6e066
commit 863501b723
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gnu/packages/vpn.scm
View file

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