me
/
guix
Archived
1
0
Fork 0

gnu: pulseaudio: Update to 16.1 and use gexps.

* gnu/packages/pulseaudio.scm (pulseaudio): Update to 16.1.
[source]: Delete trailing #t and extraneous 'begin'.
[arguments]: Use gexps.
[phases]: Delete trailing #t.
[native-inputs]: Delete input labels.
master
Maxim Cournoyer 2022-08-22 17:13:06 -04:00
parent 58c9cbc63b
commit 7693ee2dd0
No known key found for this signature in database
GPG Key ID: 1260E46482E63562
1 changed files with 51 additions and 51 deletions

View File

@ -15,6 +15,7 @@
;;; Copyright © 2020 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2020 Marius Bakke <marius@gnu.org>
;;; Copyright © 2021 Brice Waegeneire <brice@waegenei.re>
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -34,6 +35,7 @@
(define-module (gnu packages pulseaudio)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix utils)
#:use-module ((guix licenses) #:prefix l:)
@ -178,7 +180,7 @@ rates.")
(define-public pulseaudio
(package
(name "pulseaudio")
(version "15.0")
(version "16.1")
(source (origin
(method url-fetch)
(uri (string-append
@ -186,33 +188,32 @@ rates.")
name "-" version ".tar.xz"))
(sha256
(base32
"1851rg4h6sjwanvd294hn52z321rc6vbs4gbfrlw53597dx8h2x4"))
"1r2aa0g7al9jhrrbrnih6i3bfznd73kkbafrbzwpjyflj7735vwf"))
(modules '((guix build utils)))
(snippet
;; Disable console-kit support by default since it's deprecated
;; anyway.
'(begin
(substitute* "src/daemon/default.pa.in"
'(substitute* "src/daemon/default.pa.in"
(("load-module module-console-kit" all)
(string-append "#" all "\n")))
#t))
(string-append "#" all "\n"))))
(patches (search-patches
"pulseaudio-fix-mult-test.patch"
"pulseaudio-longer-test-timeout.patch"))))
(build-system meson-build-system)
(arguments
`(#:configure-flags
(let ((out (assoc-ref %outputs "out")))
(list "-Doss-output=disabled"
(list
#:configure-flags
#~(list "-Doss-output=disabled"
"-Dlocalstatedir=/var"
(string-append "-Dudevrulesdir="
out "/lib/udev/rules.d")
#$output "/lib/udev/rules.d")
;; Ensure the RUNPATH contains all installed library locations.
(string-append "-Dc_link_args=-Wl,-rpath="
out "/lib/pulseaudio:"
out "/lib:"
out "/lib/pulse-" ,version "/modules")))
#:phases (modify-phases %standard-phases
#$output "/lib/pulseaudio:"
#$output "/lib:"
#$output "/lib/pulse-" #$version "/modules"))
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'pre-check
(lambda _
;; 'tests/lock-autospawn-test.c' wants to create a file
@ -220,8 +221,7 @@ rates.")
(setenv "HOME" (getcwd))
;; 'thread-test' needs more time on hydra and on slower
;; machines, so we set the default timeout to 120 seconds.
(setenv "CK_DEFAULT_TIMEOUT" "120")
#t)))))
(setenv "CK_DEFAULT_TIMEOUT" "120"))))))
(inputs
(list alsa-lib
bluez
@ -243,14 +243,14 @@ rates.")
elogind
eudev)) ;for the detection of hardware audio devices
(native-inputs
`(("check" ,check)
("doxygen" ,doxygen)
("gettext" ,gettext-minimal)
("glib:bin" ,glib "bin")
("m4" ,m4)
("perl" ,perl)
("perl-xml-parser" ,perl-xml-parser)
("pkg-config" ,pkg-config)))
(list check
doxygen
gettext-minimal
`(,glib "bin")
m4
perl
perl-xml-parser
pkg-config))
(propagated-inputs
;; 'libpulse*.la' contain `-ltdb' and `-lcap', so propagate them.
(list libcap tdb))