[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gnu: libbluray: Enable libaacs and libbdplus support.
|
From: |
Ludovic Court�s |
|
Subject: |
03/03: gnu: libbluray: Enable libaacs and libbdplus support. |
|
Date: |
Tue, 13 Sep 2016 08:26:45 +0000 (UTC) |
civodul pushed a commit to branch master
in repository guix.
commit 6c0cd765c03de72ecd97b9222bff04c525b8bba4
Author: Andy Patterson <address@hidden>
Date: Fri Sep 9 15:52:26 2016 -0400
gnu: libbluray: Enable libaacs and libbdplus support.
* gnu/packages/video.scm (libbluray) [inputs]: Add libaacs and
libbdplus.
[arguments]: Add 'fix-dlopen-paths' to #:phases.
Signed-off-by: Ludovic Courtès <address@hidden>
---
gnu/packages/video.scm | 18 +++++++++++++++++-
1 file changed, 17 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index 7c1dae0..6c59fa0 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -978,11 +978,27 @@ YouTube.com and a few more sites.")
(base32
"1q1whviqv5sr9nr372h31zwid1rvbfbx3z4lzr8lnj25xha6cdm6"))))
(build-system gnu-build-system)
- (arguments `(#:configure-flags '("--disable-bdjava")))
+ (arguments
+ `(#:configure-flags '("--disable-bdjava")
+ #:phases
+ (modify-phases %standard-phases
+ (add-before 'build 'fix-dlopen-paths
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((libaacs (assoc-ref inputs "libaacs"))
+ (libbdplus (assoc-ref inputs "libbdplus")))
+ (substitute* "src/libbluray/disc/aacs.c"
+ (("\"libaacs\"")
+ (string-append "\"" libaacs "/lib/libaacs\"")))
+ (substitute* "src/libbluray/disc/bdplus.c"
+ (("\"libbdplus\"")
+ (string-append "\"" libbdplus "/lib/libbdplus\"")))
+ #t))))))
(native-inputs `(("pkg-config" ,pkg-config)))
(inputs
`(("fontconfig" ,fontconfig)
("freetype" ,freetype)
+ ("libaacs" ,libaacs)
+ ("libbdplus" ,libbdplus)
("libxml2" ,libxml2)))
(home-page "https://www.videolan.org/developers/libbluray.html";)
(synopsis "Blu-Ray Disc playback library")