gnu: gtk+: Move desktop files into "bin" output.
* gnu/packages/gtk.scm (gtk+)[arguments]: Add 'move-desktop-files' phase.
This commit is contained in:
parent
470613f962
commit
4c8c2b0f54
|
@ -685,7 +685,16 @@ (define-public gtk+
|
||||||
(substitute* "testsuite/Makefile.in"
|
(substitute* "testsuite/Makefile.in"
|
||||||
(("SUBDIRS = gdk gtk a11y css reftests")
|
(("SUBDIRS = gdk gtk a11y css reftests")
|
||||||
"SUBDIRS = gdk"))
|
"SUBDIRS = gdk"))
|
||||||
#t)))))
|
#t))
|
||||||
|
(add-after 'install 'move-desktop-files
|
||||||
|
;; Move desktop files into 'bin' to avoid cycle references.
|
||||||
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
(let ((out (assoc-ref outputs "out"))
|
||||||
|
(bin (assoc-ref outputs "bin")))
|
||||||
|
(mkdir-p (string-append bin "/share"))
|
||||||
|
(rename-file (string-append out "/share/applications")
|
||||||
|
(string-append bin "/share/applications"))
|
||||||
|
#t))))))
|
||||||
(native-search-paths
|
(native-search-paths
|
||||||
(list (search-path-specification
|
(list (search-path-specification
|
||||||
(variable "GUIX_GTK3_PATH")
|
(variable "GUIX_GTK3_PATH")
|
||||||
|
|
Loading…
Reference in a new issue