guix_mirror_bot pushed a commit to branch gnome-team
in repository guix.
commit 8b88fd2fd5e1e593ff58e550bb0a093d68a616ff
Author: Maxim Cournoyer <[email protected]>
AuthorDate: Fri Mar 13 15:37:30 2026 +0900
gnu: libbluray: Update to 1.4.1.
* gnu/packages/video.scm (libbluray): Update to 1.4.1.
[source]: Adjust URI.
[build-system]: Switch to meson-build-system.
[#:configure-flags]: Delete.
[#:phases] {move-packages-to-libs}: Move after install phase and adjust
accordingly.
{fix-dlopen-paths}: Order after unpack phase.
[inputs]: Add libudfread.
Change-Id: I249215317cf51e84152115983706670319dd1bb9
---
gnu/packages/video.scm | 42 +++++++++++++++++++++---------------------
1 file changed, 21 insertions(+), 21 deletions(-)
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index 07638463cc..e0706c902e 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -3741,22 +3741,32 @@ soon as it starts.")
(define-public libbluray
(package
(name "libbluray")
- (version "1.3.4")
+ (version "1.4.1")
(source (origin
(method url-fetch)
(uri (string-append "https://download.videolan.org/videolan/"
name "/" version "/"
- name "-" version ".tar.bz2"))
+ name "-" version ".tar.xz"))
(sha256
(base32
- "0aszpsz3pc7p7z6yahlib4na585m6pqbg2d9dkpyipgml1lgv3s7"))))
- (build-system gnu-build-system)
+ "0jglp44wsjpp5k3mrxskfj9b488ksn7cj2dhxfjdqa3z150drdbn"))))
+ (build-system meson-build-system)
(arguments
(list
- #:configure-flags #~(list "--disable-bdjava-jar" "--disable-static")
#:phases
#~(modify-phases %standard-phases
- (add-after 'unpack 'move-packages-to-libs
+ (add-after 'unpack 'fix-dlopen-paths
+ (lambda* (#:key inputs #:allow-other-keys)
+ (define (lib/no.so library)
+ (let ((found (search-input-file inputs library)))
+ (substring found 0 (- (string-length found)
+ (string-length ".so")))))
+ (substitute* "src/libbluray/disc/aacs.c"
+ (("\"libaacs\"")
+ (string-append "\"" (lib/no.so "lib/libaacs.so") "\""))
+ (("\"libbdplus\"")
+ (string-append "\"" (lib/no.so "lib/libbdplus.so") "\"")))))
+ (add-after 'install 'move-packages-to-libs
;; Avoid the need to propagate libxml2 et al. by referring to them
;; directly.
(lambda* (#:key inputs #:allow-other-keys)
@@ -3764,27 +3774,17 @@ soon as it starts.")
(dirname
(search-input-file inputs
(string-append "lib/lib" lib ".so"))))
- (substitute* "src/libbluray.pc.in"
- (("@PACKAGES@") "")
+ (substitute* (string-append #$output
+ "/lib/pkgconfig/libbluray.pc")
+ (("^Requires.private.*") "")
(("^Libs.private:" field)
(string-append field
" -L" (search-input-vicinity "xml2")
" -L" (search-input-vicinity "freetype")
" -L" (search-input-vicinity "fontconfig")
- " -lxml2 -lfreetype -lfontconfig")))))
- (add-before 'build 'fix-dlopen-paths
- (lambda* (#:key inputs #:allow-other-keys)
- (define (lib/no.so library)
- (let ((found (search-input-file inputs library)))
- (substring found 0 (- (string-length found)
- (string-length ".so")))))
- (substitute* "src/libbluray/disc/aacs.c"
- (("\"libaacs\"")
- (string-append "\"" (lib/no.so "lib/libaacs.so") "\""))
- (("\"libbdplus\"")
- (string-append "\"" (lib/no.so "lib/libbdplus.so")
"\""))))))))
+ " -lxml2 -lfreetype -lfontconfig"))))))))
(native-inputs (list pkg-config))
- (inputs (list fontconfig freetype libaacs libbdplus libxml2))
+ (inputs (list fontconfig freetype libaacs libbdplus libudfread libxml2))
(home-page "https://www.videolan.org/developers/libbluray.html")
(synopsis "Blu-Ray Disc playback library")
(description