From ff6cc9f2137715ab9fe0600cbd808bd86a9c0bee Mon Sep 17 00:00:00 2001
From: EuAndreh <eu@euandre.org>
Date: Mon, 12 Aug 2024 06:35:23 -0300
Subject: etc/guix/system.scm: Remove custom xmonad

---
 etc/guix/system.scm | 26 ++------------------------
 1 file changed, 2 insertions(+), 24 deletions(-)

(limited to 'etc/guix')

diff --git a/etc/guix/system.scm b/etc/guix/system.scm
index b4a2564..5628f93 100644
--- a/etc/guix/system.scm
+++ b/etc/guix/system.scm
@@ -92,28 +92,6 @@ Seiko Epson Color Ink Jet Printers.")
       (list (ng.license:nonfree "https://epson.com/SoftwareLicenseAgreement")
             license:lgpl2.1))))
 
-(define-public xmonad-wm
-  (package
-    (inherit xmonad)
-    (arguments
-      (list
-       #:phases
-       #~(modify-phases %standard-phases
-           (add-after 'install 'install-xsession
-             (lambda _
-               (let* ((xsessions (string-append #$output "/share/xsessions"))
-                      (entry     (string-append xsessions "/xmonad.desktop")))
-                 (mkdir-p xsessions)
-                 (call-with-output-file
-                  entry
-                  (lambda (port)
-                    (format port "~
-                      [Desktop Entry]~@
-                      Name=xmonad~@
-                      Comment=xmonad window manager~@
-                      Exec=~a/bin/xmonad~@
-                      Type=Application~%" #$output)))))))))))
-
 
 (define current-architecture
   (car
@@ -170,9 +148,9 @@ Seiko Epson Color Ink Jet Printers.")
             ghc
             ghc-xmonad-contrib
             xmobar
+            xmonad
             i3-wm))
-     (list
-      xmonad-wm)
+     (list)
      %base-packages))
   (services
     (append
-- 
cgit v1.2.3