remove stumpwm and guix

1 files changed, 0 insertions, 141 deletions

diff --git a/.config/guix/base.scm b/.config/guix/base.scm
deleted file mode 100644
index 194f74a..0000000
--- a/.config/guix/base.scm
+++ /dev/null
@@ -1,141 +0,0 @@
-;; This is an operating system configuration generated
-;; by the graphical installer.
-;;
-;; Once installation is complete, you can learn and modify
-;; this file to tweak the system configuration, and pass it
-;; to the 'guix system reconfigure' command to effect your
-;; changes.
-
-
-;; Indicate which modules to import to access the variables
-;; used in this configuration.
-
-(define-module (base)
-  #:use-module (gnu)
-  #:use-module (nongnu packages linux)
-  #:export (base-operating-system))
-
-(use-service-modules cups desktop networking ssh xorg)
-
-;;(define-public base-operating-system
-(operating-system
- (host-name "zeus")
- 
- (kernel linux)
- (firmware (list linux-firmware
-		 amdgpu-firmware
-		 radeon-firmware))
- 
- (locale "en_US.utf8")
- (timezone "Europe/Athens")
- (keyboard-layout (keyboard-layout "us"
-				   #:options
-				   '("ctrl:nocaps")))
- 
- ;; Guix doesn't like it when there isn't a file-systems
- ;; entry, so add one that is meant to be overridden
- 
- ;; (file-systems (cons*
- ;; 		(file-system
- ;; 		 (mount-point "/tmp")
- ;; 		 (device "none")
- ;; 		 (type "tmpfs")
- ;; 		 (check? #f))
- ;; 		%base-file-systems))
-
- ;; The list of user accounts ('root' is implicit).
- (users (cons* (user-account
-		(name "apollo")
-		(comment "Apollo")
-		(group "users")
-		(home-directory "/home/apollo")
-		;;(shell (file-append "/bin/zsh")) ;
-		(supplementary-groups '("wheel"
-					"netdev"
-					"audio"
-					"video")))	       
-	       (user-account
-		(name "elliot")
-		(comment "Elliot")
-		(group "users")
-		(home-directory "/home/elliot")
-		(supplementary-groups '("wheel"
-					"netdev"
-					"audio"
-					"video")))
-	       %base-user-accounts))
-
- ;; Packages installed system-wide.  Users can also install packages
- ;; under their own account: use 'guix search KEYWORD' to search
- ;; for packages and 'guix install PACKAGE' to install a package.
- (packages (append (map specification->package
-			`("emacs-exwm"
-			  "emacs-desktop-environment"
-			  "emacs"
-			  "bash"
-			  "xrandr"
-			  "picom"
-			  "gnome"
-			  "gnome-desktop"
-			  "nss-certs"
-			  "python"
-			  "alacritty"
-			  "emacs-vterm"
-			  "emacs-multi-vterm"
-			  "alsa-utils"
-			  "bluez-alsa"
-			  "gnome-bluetooth"
-			  "blueman"
-			  "qtile"
-			  "git"
-			  "font-jetbrains-mono"))
-		   %base-packages))
-
- ;; Below is the list of system services.  To search for available
- ;; services, run 'guix system search KEYWORD' in a terminal.
- (services
-  (append (list (service gnome-desktop-service-type)		 
-		(service openssh-service-type)
-		(bluetooth-service #:auto-enable?
-				   #t)
-		(service cups-service-type)
-		(set-xorg-configuration
-		 (xorg-configuration (keyboard-layout keyboard-layout))))
-	  ;; This is the default list of services we
-	  ;; are appending to.
-	  %desktop-services))
- 
-  (bootloader (bootloader-configuration
-              (bootloader grub-efi-bootloader)
-              (targets (list "/boot/efi"))
-              (keyboard-layout keyboard-layout)))
- (mapped-devices (list (mapped-device
-                        (source (uuid
-                                 "0594b592-ddcb-4a3c-958d-c773d7a85d93"))
-                        (target "cryptroot")
-                        (type luks-device-mapping))
-                       (mapped-device
-                        (source (uuid
-                                 "a44f40ec-94c3-457a-a9ed-5db5396f3aea"))
-                        (target "crypthome")
-                        (type luks-device-mapping))))
-
- ;; The list of file systems that get "mounted".  The unique
- ;; file system identifiers there ("UUIDs") can be obtained
- ;; by running 'blkid' in a terminal.
- (file-systems (cons* (file-system
-                       (mount-point "/boot/efi")
-                       (device (uuid "98B8-B93E"
-                                     'fat32))
-                       (type "vfat"))
-                      (file-system
-                       (mount-point "/")
-                       (device "/dev/mapper/cryptroot")
-                       (type "ext4")
-                       (dependencies mapped-devices))
-                      (file-system
-                       (mount-point "/home")
-                       (device "/dev/mapper/crypthome")
-                       (type "ext4")
-                       (dependencies mapped-devices)) %base-file-systems)))
-