me/guix
Archived
1
0
Fork 0
Code Activity

gnu: xmonad-next: Change #:phases to gexp.

Browse source 
* gnu/packages/wm.scm (xmonad-next)[arguments]: Use #$output, #$name
and #$synopsis instead of %output, name and synopsis.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Daniel Meißner 2022-04-01 09:57:58 +02:00 • committed by Ludovic Courtès
parent 66177c2b87
commit 2a70e7922c
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 12 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
gnu/packages/wm.scm
View file

@ -51,6 +51,7 @@
;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com> ;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2022 Gabriel Wicki <gabriel@erlikon.ch> ;;; Copyright © 2022 Gabriel Wicki <gabriel@erlikon.ch>
;;; Copyright © 2022 Jai Vetrivelan <jaivetrivelan@gmail.com> ;;; Copyright © 2022 Jai Vetrivelan <jaivetrivelan@gmail.com>
;;; Copyright © 2022 Daniel Meißner <daniel.meissner-i4k@ruhr-uni-bochum.de>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -758,22 +759,21 @@ desktop environment.")
(inputs (list ghc-data-default-class ghc-setlocale ghc-x11)) (inputs (list ghc-data-default-class ghc-setlocale ghc-x11))
(native-inputs (list ghc-quickcheck ghc-quickcheck-classes)) (native-inputs (list ghc-quickcheck ghc-quickcheck-classes))
(arguments (arguments
`(#:phases (list #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after (add-after 'install 'install-xsession
'install 'install-xsession (lambda _
(lambda _ (let ((xsessions (string-append #$output "/share/xsessions")))
(let* ((xsessions (string-append %output "/share/xsessions"))) (mkdir-p xsessions)
(mkdir-p xsessions) (call-with-output-file (string-append xsessions
(call-with-output-file "/xmonad.desktop")
(string-append xsessions "/xmonad.desktop") (lambda (port)
(lambda (port) (format port "~
(format port "~
[Desktop Entry]~@ [Desktop Entry]~@
Name=~a~@ Name=~a~@
Comment=~a~@ Comment=~a~@
Exec=~a/bin/xmonad~@ Exec=~a/bin/xmonad~@
Type=Application~%" ,name ,synopsis %output))))))))) Type=Application~%" #$name #$synopsis #$output)))))))))
(home-page "https://xmonad.org") (home-page "https://xmonad.org")
(description (description
"Xmonad is a tiling window manager for X. Windows are arranged "Xmonad is a tiling window manager for X. Windows are arranged