mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 15:36:20 -05:00
gnu: redshift-wayland: Install redshift.desktop.
* gnu/packages/xdisorg.scm (redshift-wayland)[arguments]: New field.
This commit is contained in:
parent
21d3b765d9
commit
b1affd4778
1 changed files with 18 additions and 0 deletions
|
@ -1238,6 +1238,24 @@ (define-public redshift-wayland
|
|||
(base32
|
||||
"0nbkcw3avmzjg1jr1g9yfpm80kzisy55idl09b6wvzv2sz27n957"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
'(#:phases (modify-phases %standard-phases
|
||||
(add-after 'install 'create-desktop-file
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; For the GeoClue provider to work, a .desktop file
|
||||
;; needs to be provided. A template is available,
|
||||
;; but it only gets installed when the GUI is enabled.
|
||||
;; Install it manually for this Wayland variant.
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(desktop-file
|
||||
(string-append
|
||||
out "/share/applications/redshift.desktop")))
|
||||
(mkdir-p (dirname desktop-file))
|
||||
(copy-file "data/applications/redshift.desktop.in"
|
||||
desktop-file)
|
||||
(substitute* desktop-file
|
||||
(("^_") ""))
|
||||
#t))))))
|
||||
(native-inputs
|
||||
`(("autoconf" ,autoconf)
|
||||
("automake" ,automake)
|
||||
|
|
Loading…
Reference in a new issue