summaryrefslogtreecommitdiff
path: root/gnu/packages/wm.scm
diff options
context:
space:
mode:
authorjonscoresby--- <jonscoresby@mailbox.org>2022-08-26 09:28:20 -0600
committerMarius Bakke <marius@gnu.org>2022-08-27 23:48:56 +0200
commitb0d64a81dcf95c725a5e547a71d20c29d41b5c6f (patch)
tree9e601f7fc887ce56fc657a5137494fb1f8e39c68 /gnu/packages/wm.scm
parent69820ecfd9269216cbccab8202718e015c46bd72 (diff)
downloadguix-patches-b0d64a81dcf95c725a5e547a71d20c29d41b5c6f.tar
guix-patches-b0d64a81dcf95c725a5e547a71d20c29d41b5c6f.tar.gz
gnu: qtile: Install .desktop file.
* gnu/packages/wm.scm (qtile)[arguments]: Add install-xsession phase. Signed-off-by: Marius Bakke <marius@gnu.org>
Diffstat (limited to 'gnu/packages/wm.scm')
-rw-r--r--gnu/packages/wm.scm11
1 files changed, 10 insertions, 1 deletions
diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm
index 7ea6840689..5084d194a6 100644
--- a/gnu/packages/wm.scm
+++ b/gnu/packages/wm.scm
@@ -579,7 +579,16 @@ subscribe to events.")
(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