[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gnu: mkvtoolnix:gui: Don't require :out to be installed.
From: |
guix-commits |
Subject: |
03/03: gnu: mkvtoolnix:gui: Don't require :out to be installed. |
Date: |
Tue, 27 Aug 2019 02:50:46 -0400 (EDT) |
nckx pushed a commit to branch master
in repository guix.
commit 07272bd8e0809de2dcfc068244c5218506418a10
Author: Tobias Geerinckx-Rice <address@hidden>
Date: Mon Aug 26 19:22:00 2019 +0200
gnu: mkvtoolnix:gui: Don't require :out to be installed.
* gnu/packages/video.scm (mkvtoolnix)[arguments]: Add a
‘patch-relative-file-names’ phase to call ‘mkvmerge’ from :out.
---
gnu/packages/video.scm | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index 055b9a0..43581e7 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -418,6 +418,13 @@ H.264 (MPEG-4 AVC) video streams.")
"--enable-precompiled-headers=no")
#:phases
(modify-phases %standard-phases
+ (add-after 'unpack 'patch-relative-file-names
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (substitute* "src/mkvtoolnix-gui/util/settings.cpp"
+ (("mkvmerge" match)
+ (string-append out "/bin/" match)))
+ #t)))
(add-before 'configure 'add-googletest
(lambda* (#:key inputs #:allow-other-keys)
(symlink