rekahsoft
/
guix
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: straw-viewer: Comment out .desktop installation. 

This will only make sense when the GTK version is built.

* gnu/packages/video.scm (straw-viewer)[arguments]: Comment out
‘install-desktop’ phase.
This commit is contained in:
Tobias Geerinckx-Rice 2020-07-28 16:03:03 +02:00
parent 33de9ee42f
commit 511bfafa14
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
gnu/packages/video.scm
View File

@ -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"))