From 511bfafa14e90304b1c9b82dad7321daa1668e32 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Tue, 28 Jul 2020 16:03:03 +0200 Subject: [PATCH] gnu: straw-viewer: Comment out .desktop installation. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This will only make sense when the GTK version is built. * gnu/packages/video.scm (straw-viewer)[arguments]: Comment out ‘install-desktop’ phase. --- gnu/packages/video.scm | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index e63f2341c9..e3bb447fa0 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -577,15 +577,15 @@ H.264 (MPEG-4 AVC) video streams.") (format #f "'~a/bin/xdg-open'" (assoc-ref inputs "xdg-utils")))) #t)) - (add-after 'install 'install-desktop - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (sharedir (string-append out "/share"))) - (install-file "share/gtk-straw-viewer.desktop" - (string-append sharedir "/applications")) - (install-file "share/icons/gtk-straw-viewer.png" - (string-append sharedir "/pixmaps")) - #t))) + ;; (add-after 'install 'install-desktop + ;; (lambda* (#:key outputs #:allow-other-keys) + ;; (let* ((out (assoc-ref outputs "out")) + ;; (sharedir (string-append out "/share"))) + ;; (install-file "share/gtk-straw-viewer.desktop" + ;; (string-append sharedir "/applications")) + ;; (install-file "share/icons/gtk-straw-viewer.png" + ;; (string-append sharedir "/pixmaps")) + ;; #t))) (add-after 'install 'wrap-program (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out"))