From 07272bd8e0809de2dcfc068244c5218506418a10 Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Mon, 26 Aug 2019 19:22:00 +0200
Subject: [PATCH] gnu: mkvtoolnix:gui: Don't require :out to be installed.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

* 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 055b9a0106..43581e7f62 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