gnu: avidemux: Use gexps.

* gnu/packages/video.scm (avidemux) [phases]: Use gexps.

Change-Id: I8a02285a7c85c4cd78558e88c073d62e10fe8d4d
This commit is contained in:
Maxim Cournoyer 2025-03-22 23:48:59 +09:00
parent ba53c29c43
commit a3ed1a2e0d
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -3634,11 +3634,12 @@ for use with HTML5 video.")
sqlite
zlib))
(arguments
`(#:tests? #f ; no check target
(list
#:tests? #f ; no check target
#:phases
;; Make sure files inside the included ffmpeg tarball are
;; patch-shebanged.
(let ((ffmpeg "ffmpeg-4.2.4"))
#~(let ((ffmpeg "ffmpeg-4.2.4"))
(modify-phases %standard-phases
(add-before 'patch-source-shebangs 'unpack-ffmpeg
(lambda _
@ -3661,8 +3662,8 @@ for use with HTML5 video.")
(setenv "CMAKE_LIBRARY_PATH" (getenv "LIBRARY_PATH"))
(setenv "CMAKE_INCLUDE_PATH" (getenv "C_INCLUDE_PATH"))))
(replace 'build
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(lambda _
(let* ((out #$output)
(lib (string-append out "/lib"))
(top (getcwd))
(build_component