diff options
| author | EuAndreh <eu@euandre.org> | 2022-05-13 19:00:24 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2022-05-13 19:00:24 -0300 |
| commit | c0b014a598a15a31e503f62ba498c5a39da661a6 (patch) | |
| tree | f1e82618263d887563b942e70faa52e5b71a4744 | |
| parent | etc/guix/system.scm: Do not include users in the "wheel" group by default (diff) | |
| download | dotfiles-c0b014a598a15a31e503f62ba498c5a39da661a6.tar.gz dotfiles-c0b014a598a15a31e503f62ba498c5a39da661a6.tar.xz | |
etc/guix/system.scm: Replace xmonad-current with xmonad-next
| -rw-r--r-- | etc/guix/system.scm | 18 |
1 files changed, 3 insertions, 15 deletions
diff --git a/etc/guix/system.scm b/etc/guix/system.scm index 1965708..cb57af5 100644 --- a/etc/guix/system.scm +++ b/etc/guix/system.scm @@ -21,19 +21,6 @@ (nongnu system linux-initrd) (srfi srfi-1)) -(define xmonad-current - (package - (inherit xmonad) - (arguments - (substitute-keyword-arguments (package-arguments xmonad) - ((#:phases phases) - `(modify-phases ,phases - (add-after 'install-xsession 'set-desktop-name - (lambda* (#:key outputs #:allow-other-keys) - (substitute* (string-append (assoc-ref outputs "out") - "/share/xsessions/xmonad.desktop") - (("Name=xmonad-next") "Name=xmonad")))))))))) - (define backlight-device (call-with-input-file (string-append (getenv "XDG_CONFIG_HOME") @@ -69,8 +56,9 @@ (append (map (compose list specification->package+output symbol->string) '(nss-certs - i3-wm)) - (list xmonad-current) + i3-wm + xmonad-next)) + (list) (remove (lambda (package) (equal? "wget" (package-name package))) %base-packages))) |