diff options
| author | Julian Flake <flake@uni-koblenz.de> | 2024-11-28 22:11:51 +0100 |
|---|---|---|
| committer | Andreas Enge <andreas@enge.fr> | 2025-05-15 13:38:50 +0200 |
| commit | cff66ca3fca54f81a7b411bd06f47b49e8fc0609 (patch) | |
| tree | e6b42040da9798d3935f056f2b35e23f85db22ba | |
| parent | f3a5639b722c3b829ec10c0db217d12d27c79823 (diff) | |
| download | guix-cff66ca3fca54f81a7b411bd06f47b49e8fc0609.tar.gz guix-cff66ca3fca54f81a7b411bd06f47b49e8fc0609.zip | |
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.scm | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 818cdc76d3..b4ab163339 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -6577,7 +6577,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 @@ -6585,7 +6585,7 @@ Bluetooth audio output devices like headphones or loudspeakers.") version ".tar.xz")) (sha256 (base32 - "0vjk4ihywzv8k07bxq7clqgi2afrw54nfp0gcnxw35m98nipz7a9")))) + "12pal1m4xlr8k7kxb6isv5lbaca2wc5zcgy0907wfwcz78qaar21")))) (build-system gnu-build-system) (arguments (list @@ -6609,6 +6609,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 |