me
/
guix
Archived
1
0
Fork 0
Code

gnu: stunnel: Use G-expressions. 

* gnu/packages/web.scm (stunnel)[arguments]:
Rewrite as G-expressions.
master
Tobias Geerinckx-Rice 2022-01-09 03:50:09 +01:00
parent 4a98f416d6
commit 53846e252b
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 18 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
gnu/packages/web.scm
View File

@ -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