diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-01-09 03:50:09 +0100 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-01-10 00:32:35 +0100 |
| commit | 53846e252b1715bc3af1e7f4fa11f26cd07029bc (patch) | |
| tree | f5cf2f75238263184b224df62b6275e0eedacd5a | |
| parent | 4a98f416d6de6d3922e92e3f06305da7207e099b (diff) | |
| download | guix-53846e252b1715bc3af1e7f4fa11f26cd07029bc.tar.gz guix-53846e252b1715bc3af1e7f4fa11f26cd07029bc.zip | |
gnu: stunnel: Use G-expressions.
* gnu/packages/web.scm (stunnel)[arguments]:
Rewrite as G-expressions.
| -rw-r--r-- | gnu/packages/web.scm | 35 |
1 files changed, 18 insertions, 17 deletions
diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index 48582b5491..c3821fb325 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -5810,23 +5810,24 @@ tools like SSH (Secure Shell) to reach the outside world.") ("python" ,python))) (inputs (list openssl)) (arguments - `(#:configure-flags - (list (string-append "--with-ssl=" (assoc-ref %build-inputs "openssl"))) - #:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-output-directories - (lambda _ - ;; Some (not all) Makefiles have a hard-coded incorrect docdir. - (substitute* (list "Makefile.in" - "doc/Makefile.in" - "tools/Makefile.in") - (("/doc/stunnel") - (string-append "/doc/" ,name "-" ,version))))) - (add-after 'install 'prune-documentation - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (doc (string-append out "/share/doc/" ,name "-" ,version))) - (for-each delete-file (find-files doc "^INSTALL")))))))) + (list #:configure-flags + #~(list (string-append "--with-ssl=" + #$(this-package-input "openssl"))) + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-output-directories + (lambda _ + ;; Some (not all) Makefiles have a hard-coded incorrect docdir. + (substitute* (list "Makefile.in" + "doc/Makefile.in" + "tools/Makefile.in") + (("/doc/stunnel") + (string-append "/doc/" #$name "-" #$version))))) + (add-after 'install 'prune-documentation + (lambda _ + (let* ((doc (string-append #$output "/share/doc/" + #$name "-" #$version))) + (for-each delete-file (find-files doc "^INSTALL")))))))) (home-page "https://www.stunnel.org") (synopsis "TLS proxy for clients or servers") (description "Stunnel is a proxy designed to add TLS encryption |