diff options
| author | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2025-05-17 14:04:29 +0300 |
|---|---|---|
| committer | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2025-05-17 14:04:42 +0300 |
| commit | 5e83a506de5082221b873df84a3221d845ce0925 (patch) | |
| tree | 56d8cd4d115a43708d0d59d80387f3c4a0091d72 | |
| parent | d3b495f956c6af359b8987bea524c5aa2d802d44 (diff) | |
| download | guix-5e83a506de5082221b873df84a3221d845ce0925.tar.gz guix-5e83a506de5082221b873df84a3221d845ce0925.zip | |
gnu: tunctl: Use GEXPs.
* gnu/packages/networking.scm (tunctl): Use GEXPs.
Change-Id: I8a5190dfce389be440ca6abbcc183961cbc93e51
| -rw-r--r-- | gnu/packages/networking.scm | 33 |
1 files changed, 16 insertions, 17 deletions
diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index 8bebbddfae..de01cdb8b0 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -4457,23 +4457,22 @@ easy-to-understand binary values.") (base32 "1zsgn7w6l2zh2q0j6qaw8wsx981qcr536qlz1lgb3b5zqr66qama")))) (build-system gnu-build-system) (arguments - `(#:phases - (modify-phases %standard-phases - (delete 'bootstrap) ;there is no configure.ac file - (delete 'configure) ;there is no configure script - (delete 'check) ;there are no tests - (replace 'build - (lambda _ - (setenv "CC" "gcc") - (invoke "make" "tunctl"))) - ;; TODO: Requires docbook-to-man (unrelated to docbook2x and - ;; docbook-utils) to generate man page from SGML. - (replace 'install - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (bin (string-append out "/bin"))) - (install-file "tunctl" bin)) - #t))))) + (list + #:phases + #~(modify-phases %standard-phases + (delete 'bootstrap) ;there is no configure.ac file + (delete 'configure) ;there is no configure script + (delete 'check) ;there are no tests + (replace 'build + (lambda _ + (setenv "CC" "gcc") + (invoke "make" "tunctl"))) + ;; TODO: Requires docbook-to-man (unrelated to docbook2x and + ;; docbook-utils) to generate man page from SGML. + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let ((bin (string-append #$output "/bin"))) + (install-file "tunctl" bin))))))) (home-page "https://tunctl.sourceforge.net") (synopsis "Utility to set up and maintain TUN/TAP network interfaces") (description "Tunctl is used to set up and maintain persistent TUN/TAP |