(address . guix-patches@gnu.org)
20230228173127.3033-1-eu@euandre.org
* gnu/packages/wm.scm (xmonad)[arguments]: Add 'install-xsession phase
that was removed in previous automated update[0].
---
gnu/packages/wm.scm | 20 ++++++++++++++++++--
1 file changed, 18 insertions(+), 2 deletions(-)
Toggle diff (33 lines)
diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm
index 9ba2841817..e6b7df544e 100644
--- a/gnu/packages/wm.scm
+++ b/gnu/packages/wm.scm
@@ -817,8 +817,24 @@ (define-public xmonad
(inputs (list ghc-x11 ghc-data-default-class ghc-setlocale))
(native-inputs (list ghc-quickcheck ghc-quickcheck-classes))
(arguments
- `(#:cabal-revision ("2"
- "1rgwrnyb7kijzl2mqm8ks2nydh37q5vkbg4400rg9n6x13w2r9b3")))
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'install-xsession
+ (lambda _
+ (let ((xsessions (string-append #$output "/share/xsessions")))
+ (mkdir-p xsessions)
+ (call-with-output-file (string-append xsessions
+ "/xmonad.desktop")
+ (lambda (port)
+ (format port "~
+ [Desktop Entry]~@
+ Name=~a~@
+ Comment=xmonad window manager~@
+ Exec=~a/bin/xmonad~@
+ Type=Application~%" #$name #$output)))))))
+ #:cabal-revision '("2"
+ "1rgwrnyb7kijzl2mqm8ks2nydh37q5vkbg4400rg9n6x13w2r9b3")))
(home-page "http://xmonad.org")
(synopsis "Tiling window manager")
(description
--
2.39.1