ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-16 19:57:39 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: nginx-rtmp-module: Use gexps in phases.

Browse source 
* gnu/packages/web.scm (nginx-rtmp-module)[#:phases]: Use gexps and
remove trailing #t.

Signed-off-by: Christopher Baines <mail@cbaines.net>
This commit is contained in:
Jack Hill 2022-05-26 22:04:04 -04:00 committed by Christopher Baines
parent 9bb71eaac0
commit 0e953f3332
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 6 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/web.scm
View file

@ -800,24 +800,22 @@ (define-public nginx-rtmp-module
((#:phases phases)
#~(modify-phases #$phases
(add-after 'unpack 'unpack-nginx-sources
(lambda* (#:key inputs native-inputs #:allow-other-keys)
(lambda _
(begin
;; The nginx source code is part of the module’s source.
(format #t "decompressing nginx source code~%")
(invoke "tar" "xvf" (assoc-ref inputs "nginx-sources")
(invoke "tar" "xvf" #$(this-package-input "nginx-sources")
;; This package's LICENSE file would be
;; overwritten with the one from nginx when
;; unpacking the nginx source, so rename the nginx
;; one when unpacking.
"--transform=s,/LICENSE$,/LICENSE.nginx,"
"--strip-components=1")
#t)))
"--strip-components=1"))))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let ((modules-dir (string-append (assoc-ref outputs "out")
(lambda _
(let ((modules-dir (string-append #$output
"/etc/nginx/modules")))
(install-file "objs/ngx_rtmp_module.so" modules-dir)
#t)))
(install-file "objs/ngx_rtmp_module.so" modules-dir))))
(delete 'fix-root-dirs)
(delete 'install-man-page)))))
(home-page "https://github.com/arut/nginx-rtmp-module")