summary refs log tree commit diff
path: root/gnu
diff options
context:
space:
mode:
authorPierre Neidhardt <mail@ambrevar.xyz>2019-03-15 20:32:36 +0100
committerPierre Neidhardt <mail@ambrevar.xyz>2019-03-15 20:33:34 +0100
commitb55db49481394214adc30be623078c723d32c707 (patch)
tree33b838a6c3edfa8eea671609f486fe46fb5a4c9b /gnu
parent0754f29afc797de88f68736db751c53a5cc64f4b (diff)
downloadguix-b55db49481394214adc30be623078c723d32c707.tar.gz
gnu: mkvtoolnix: Move all GUI files to the "gui" output.
* gnu/packages/video.scm (mkvtoolnix)[arguments]: Do it.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/video.scm22
1 files changed, 18 insertions, 4 deletions
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index ee49d35cec..5b40a7d4a5 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -437,15 +437,29 @@ H.264 (MPEG-4 AVC) video streams.")
          (add-after 'install 'post-install
            (lambda* (#:key outputs #:allow-other-keys)
              ;; Move the Qt interface to "gui".
-             (let ((out (assoc-ref outputs "out"))
-                   (gui (assoc-ref outputs "gui")))
+             (let* ((out (assoc-ref outputs "out"))
+                    (gui (assoc-ref outputs "gui"))
+                    (strip-store-dir (lambda (path)
+                                       (substring path (string-prefix-length out path)))))
                (for-each
                 (lambda (file)
                   (mkdir-p (string-append gui (dirname file)))
                   (rename-file (string-append out file)
                                (string-append gui file)))
-                '("/bin/mkvtoolnix-gui"
-                  "/share/applications/org.bunkus.mkvtoolnix-gui.desktop")))
+                (append '("/bin/mkvtoolnix-gui"
+                          "/share/applications/org.bunkus.mkvtoolnix-gui.desktop"
+                          "/share/metainfo/org.bunkus.mkvtoolnix-gui.appdata.xml"
+                          "/share/mime/packages/org.bunkus.mkvtoolnix-gui.xml")
+                        (map strip-store-dir (find-files out "\\.ogg$"))
+                        (map strip-store-dir (find-files out "mkvtoolnix-gui\\.png$"))
+                        (map strip-store-dir (find-files out "mkvtoolnix-gui\\.1"))))
+               (for-each
+                (lambda (file)
+                  (delete-file-recursively (string-append out file)))
+                '("/share/applications"
+                  "/share/metainfo"
+                  "/share/mime"
+                  "/share/mkvtoolnix")))
              #t)))))
     (home-page "https://mkvtoolnix.download")
     (synopsis "Tools to create, alter and inspect Matroska files")