mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-20 06:37:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: qtile: Install .desktop file.

Browse source 
* gnu/packages/wm.scm (qtile)[arguments]: Add install-xsession phase.

Signed-off-by: Marius Bakke <marius@gnu.org>
This commit is contained in:
jonscoresby--- 2022-08-26 09:28:20 -06:00 committed by Marius Bakke
parent 69820ecfd9
commit b0d64a81dc
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
gnu/packages/wm.scm
View file

@ -579,7 +579,16 @@ (define-public qtile
(assoc-ref inputs "pango") "/lib/libpango-1.0.so.0\")\n"))
(("^pangocairo = ffi.dlopen.*")
(string-append "pangocairo = ffi.dlopen(\""
(assoc-ref inputs "pango") "/lib/libpangocairo-1.0.so.0\")\n"))))))))
(assoc-ref inputs "pango") "/lib/libpangocairo-1.0.so.0\")\n")))))
(add-after 'install 'install-xsession
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(xsessions (string-append out "/share/xsessions"))
(qtile (string-append out "/bin/qtile start")))
(mkdir-p xsessions)
(copy-file "resources/qtile.desktop" (string-append xsessions "/qtile.desktop"))
(substitute* (string-append xsessions "/qtile.desktop")
(("qtile start") qtile))))))))
(inputs
(list glib pango pulseaudio))
(propagated-inputs