Uninstall Sway

1 files changed, 1 insertions, 51 deletions

diff --git a/aisaka.org b/aisaka.org
index c7ff4b4..f4f7e20 100644
--- a/aisaka.org
+++ b/aisaka.org
@@ -96,8 +96,7 @@ https://guix.gnu.org/en/manual/devel/en/html_node/Home-Configuration.html
     #:use-module (gnu packages)
     #:use-module (gnu services)
     #:use-module (guix gexp)
-    #:use-module (ssh-server)
-    #:use-module (sway))
+    #:use-module (ssh-server))
 
   (define allow-downgrades
     "--allow-downgrades ")
@@ -201,8 +200,6 @@ https://guix.gnu.org/en/manual/devel/en/html_node/Home-Configuration.html
    (services
     `(,<<flashrom-package>>
       ,ssh-configuration
-      ,sway-configuration
-      ,sway-packages
       ,(service home-bash-service-type
                 (home-bash-configuration
                  (environment-variables '(("EDITOR" . "emacs -nw")
@@ -342,50 +339,3 @@ memory without overprovisioning, as well as to prolog the lifetime of SSD.
 * TODO Device Management
 ** TODO Trezor
 
-* TODO Desktop Environment
-
-Sway is the currently chosen operating environment.
-
-** TODO Sway Window Manager
-
-The Sway Window Manager consists of Sway packages and relevant configurations.
-
-#+begin_src scheme :noweb-ref sway :tangle services/sway.scm
-  (add-to-load-path "./services")
-
-  (define-module (sway)
-    #:use-module (gnu)
-    #:use-module (gnu home)
-    #:use-module (gnu home services)
-    #:use-module (gnu home services shells))
-
-  <<sway-packages>>
-
-  <<sway-configuration>>
-#+end_src
-
-*** TODO Sway Installation
-
-#+begin_src scheme :noweb-ref sway-packages
-  (define-public sway-packages
-    (service
-     (service-type
-      (name 'sway-packages)
-      (extensions
-       `(,(service-extension home-profile-service-type
-			     (lambda (_)
-			       (map specification->package
-				    '("sway"
-				      "waybar"))))))
-      (description "Sway Window Manager installation.")
-      (default-value #f))))
-#+end_src
-
-*** TODO Sway configuration
-
-#+begin_src scheme :noweb-ref sway-configuration
-  (define-public sway-configuration
-    (simple-service 'configuration-files home-files-service-type
-		    `((".config/sway/config" ,(local-file "../sway.config"))
-		      (".config/waybar/config" ,(local-file "../waybar.config")))))
-#+end_src