summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/fvwm.scm21
1 files changed, 21 insertions, 0 deletions
diff --git a/gnu/packages/fvwm.scm b/gnu/packages/fvwm.scm
index 5ff3d5e4f2..a4c31aefc6 100644
--- a/gnu/packages/fvwm.scm
+++ b/gnu/packages/fvwm.scm
@@ -45,6 +45,27 @@
(base32
"0wzghjgy65pkn31rgl14fngizw7nbkzbxsfa670xmrndpmd4sr81"))))
(build-system gnu-build-system)
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ (add-after 'install 'install-xsession
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (xsessions (string-append out "/share/xsessions")))
+ (mkdir-p xsessions)
+ (with-output-to-file
+ (string-append xsessions "/fvwm2.desktop")
+ (lambda _
+ (format #t
+ "[Desktop Entry]~@
+ Name=FVWM~@
+ Comment=FVWM~@
+ Exec=~a/bin/fvwm~@
+ TryExec=~@*~a/bin/fvwm~@
+ Icon=~@
+ Type=Application~%"
+ out))))
+ #t)))))
(native-inputs
`(("perl" ,perl)
("pkg-config" ,pkg-config)