summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJulian Flake <flake@uni-koblenz.de>2024-11-28 22:11:51 +0100
committerAndreas Enge <andreas@enge.fr>2025-05-14 10:59:24 +0200
commitc10a025c2a1d8758a2dd7ff762c72ba9907c9d8d (patch)
tree599a08a115b7a26baff1860a375d8f94a7a2a912
parent9c3d2eca4d7b3570edad40e98076a965d1345f4e (diff)
gnu: bluez: Update to 5.79.
* gnu/packages/linux.scm (bluez): Update to 5.79. [arguments]: Replace the 'install' phase to work around an installation failure, described here: https://issues.guix.gnu.org/74597#5 Co-authored-by: Dariqq <dariqq@posteo.net> Change-Id: I5928664f929d1bda6e8c8c5e37cb9020a9889881 Signed-off-by: Leo Famulari <leo@famulari.name>
-rw-r--r--gnu/packages/linux.scm16
1 files changed, 14 insertions, 2 deletions
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 87dd44d4b3..4b86452f38 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -6589,7 +6589,7 @@ Bluetooth audio output devices like headphones or loudspeakers.")
(define-public bluez
(package
(name "bluez")
- (version "5.72")
+ (version "5.79")
(source (origin
(method url-fetch)
(uri (string-append
@@ -6597,7 +6597,7 @@ Bluetooth audio output devices like headphones or loudspeakers.")
version ".tar.xz"))
(sha256
(base32
- "0vjk4ihywzv8k07bxq7clqgi2afrw54nfp0gcnxw35m98nipz7a9"))))
+ "12pal1m4xlr8k7kxb6isv5lbaca2wc5zcgy0907wfwcz78qaar21"))))
(build-system gnu-build-system)
(arguments
(list
@@ -6621,6 +6621,18 @@ Bluetooth audio output devices like headphones or loudspeakers.")
(lambda _
(substitute* "unit/test-gatt.c"
(("tester_init\\(&argc, &argv\\);") "return 77;"))))
+ (replace 'install
+ (lambda* (#:key make-flags #:allow-other-keys #:rest args)
+ ;; Override the sysconfdir and localstatedir locations only for
+ ;; the installation phase. Otherwise, the installation fails when
+ ;; it tries to write to /etc/bluetooth and /var.
+ (define make-flags*
+ (append make-flags (list (string-append "sysconfdir="
+ #$output "/etc")
+ (string-append "localstatedir="
+ #$output "/var"))))
+ (apply (assoc-ref %standard-phases 'install)
+ (append args (list #:make-flags make-flags*)))))
(add-after 'install 'post-install
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((servicedir (string-append #$output