mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-01 00:52:55 -05:00
gnu: gst-plugins/selection: Implement in terms of G-Expressions.
* gnu/packages/gstreamer.scm (gst-plugins/selection)[#:configure-flags]: Use G-Expressions. [#:phases]: Likewise. Drop trailing #t. * gnu/packages/video.scm (pitivi)[inputs]: Adjust accordingly.
This commit is contained in:
parent
badee2b419
commit
f1fdde3c45
2 changed files with 14 additions and 14 deletions
|
@ -29,6 +29,7 @@
|
|||
(define-module (gnu packages gstreamer)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (guix packages)
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix download)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (guix build-system cmake)
|
||||
|
@ -1035,20 +1036,19 @@ (define-public gst-plugins/selection
|
|||
(package/inherit pkg
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments pkg)
|
||||
((#:configure-flags flags `(,@(or configure-flags '())))
|
||||
`(append
|
||||
((#:configure-flags flags #~'())
|
||||
#~(append
|
||||
(list
|
||||
,@(map (lambda (plugin)
|
||||
(string-append "-D" plugin "=enabled"))
|
||||
plugins))
|
||||
(list ,@(or configure-flags flags))))
|
||||
((#:phases phases)
|
||||
`(modify-phases ,phases
|
||||
(add-after 'unpack 'disable-auto-plugins
|
||||
(lambda _
|
||||
(substitute* "meson_options.txt"
|
||||
(("'auto'") "'disabled'"))
|
||||
#t)))))))))
|
||||
#$@(map (lambda (plugin)
|
||||
(string-append "-D" plugin "=enabled"))
|
||||
plugins))
|
||||
#$(or configure-flags flags)))
|
||||
((#:phases phases)
|
||||
#~(modify-phases #$phases
|
||||
(add-after 'unpack 'disable-auto-plugins
|
||||
(lambda _
|
||||
(substitute* "meson_options.txt"
|
||||
(("'auto'") "'disabled'")))))))))))
|
||||
|
||||
(define-public python-gst
|
||||
(package
|
||||
|
|
|
@ -4353,7 +4353,7 @@ (define-public pitivi
|
|||
(gst-plugins/selection gst-plugins-bad #:plugins
|
||||
'("debugutils" "transcode")
|
||||
#:configure-flags
|
||||
'("-Dintrospection=enabled"))
|
||||
#~'("-Dintrospection=enabled"))
|
||||
gst-libav
|
||||
gsound
|
||||
gtk+
|
||||
|
|
Loading…
Reference in a new issue