[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: mkvtoolnix: Move all GUI files to the "gui" output.
From: |
guix-commits |
Subject: |
01/01: gnu: mkvtoolnix: Move all GUI files to the "gui" output. |
Date: |
Fri, 15 Mar 2019 15:33:40 -0400 (EDT) |
ambrevar pushed a commit to branch master
in repository guix.
commit b55db49481394214adc30be623078c723d32c707
Author: Pierre Neidhardt <address@hidden>
Date: Fri Mar 15 20:32:36 2019 +0100
gnu: mkvtoolnix: Move all GUI files to the "gui" output.
* gnu/packages/video.scm (mkvtoolnix)[arguments]: Do it.
---
gnu/packages/video.scm | 22 ++++++++++++++++++----
1 file changed, 18 insertions(+), 4 deletions(-)
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index ee49d35..5b40a7d 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")