summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-01-21 14:13:27 +0200
committerThanos Apollo <[email protected]>2023-01-21 14:13:27 +0200
commit452ceeb456eed9d30e40dcd1d3cfc5ef04782f70 (patch)
tree607d61a0b0acfb61457303471c8839709f15fffe
parentbd1dd4e45548fb8bf1478cac0ace26eb62b8db5c (diff)
guix:Remove old systems
-rw-r--r--.config/guix/evilgnu.scm29
-rw-r--r--.config/guix/system.scm157
2 files changed, 0 insertions, 186 deletions
diff --git a/.config/guix/evilgnu.scm b/.config/guix/evilgnu.scm
deleted file mode 100644
index fceee81..0000000
--- a/.config/guix/evilgnu.scm
+++ /dev/null
@@ -1,29 +0,0 @@
-(define-module (evilgnu)
- #:use-module (system)
- #:use-module (gnu))
-
-
-
-(operating-system
- (inherit base-operating-system)
- (host-name "evilgnu")
-
- (file-systems (cons* (file-system
- (mount-point "/boot/efi")
- (device (uuid "021E-83B3"
- 'fat32))
- (type "vfat"))
- (file-system
- (mount-point "/")
- (device (uuid
- "b0147644-6bbf-41b8-85c5-0a4c3fce042b"
- 'ext4))
- (type "ext4"))
- (file-system
- (mount-point "/home")
- (device (uuid
- "4cf08e5e-47c3-41b4-bd05-abbe5e6f5590"
- 'ext4))
- (type "ext4")) %base-file-systems)))
-
-
diff --git a/.config/guix/system.scm b/.config/guix/system.scm
deleted file mode 100644
index afb60fa..0000000
--- a/.config/guix/system.scm
+++ /dev/null
@@ -1,157 +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 (system)
- #:use-module (gnu)
- #:use-module (nongnu packages linux)
- #:use-module (gnu)
- #:use-module (srfi srfi-1)
- #:use-module (gnu system nss)
- #:use-module (gnu services pm)
- #:use-module (gnu services ssh)
- #:use-module (gnu services cups)
- #:use-module (gnu services guix)
- #:use-module (gnu services desktop)
- #:use-module (gnu services docker)
- #:use-module (gnu services networking)
- #:use-module (gnu services virtualization)
- #:use-module (gnu packages wm)
- #:use-module (gnu packages cups)
- #:use-module (gnu packages vim)
- #:use-module (gnu packages gtk)
- #:use-module (gnu packages xorg)
- #:use-module (gnu packages emacs)
- #:use-module (gnu packages file-systems)
- #:use-module (gnu packages gnome)
- #:use-module (gnu packages mtools)
- #:use-module (gnu packages linux)
- #:use-module (gnu packages audio)
- #:use-module (gnu packages gnuzilla)
- #:use-module (gnu packages web-browsers)
- #:use-module (gnu packages version-control)
- #:use-module (gnu packages package-management)
- #:use-module (nongnu packages linux)
- #:use-module (nongnu system linux-initrd))
-
-
-(use-service-modules cups desktop networking ssh xorg)
-(define-public base-operating-system
- (operating-system
- (kernel linux)
- (firmware (list linux-firmware))
- (locale "en_US.utf8")
- (timezone "Europe/Athens")
- (keyboard-layout (keyboard-layout "us,gr"
- #:options
- '("ctrl:nocaps")))
- (host-name "evilgnu")
-
- ;; The list of user accounts ('root' is implicit).
- (users (cons* (user-account
- (name "apollo")
- (comment "Apollo")
- (group "users")
- (home-directory "/home/apollo")
- (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"
- "gnome"
- "gnome-desktop"
- "nss-certs"
- "htop"
- "python"
- "firefox"
- "telegram-desktop"
- "alacritty"
- "emacs-vterm"
- "emacs-multi-vterm"
- "bluez-alsa"
- "gnome-bluetooth"
- "blueman"
- "qtile"
- "flatpak"
- "yt-dlp"
- "git"))
- %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 static-networking-service-type
- ;; (list (static-networking
- ;; (addresses
- ;; (list (network-address
- ;; (device "enp5s0")
- ;; (value "192.168.1.26/24"))))
- ;; (routes
- ;; (list (network-route
- ;; (destination "default")
- ;; (gateway "192.168.1.255"))))
- ;; (name-servers '("192.168.1.1"
- ;; "8.8.8.8"
- ;; "fe80::1%enp5s0")))))
- ;; To configure OpenSSH, pass an 'openssh-configuration'
- ;; record as a second argument to 'service' below.
- (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))
- ;; (static-networking-service "eth0" "192.168.1.26"
- ;; #:netmask "255.255.255.0"
- ;; #:gateway "192.168.1.255"
- ;; #:name-servers '("192.168.1.1"
- ;; "8.8.8.8")))
-
- (bootloader (bootloader-configuration
- (bootloader grub-efi-bootloader)
- (targets (list "/boot/efi"))
- (keyboard-layout keyboard-layout)))
- (swap-devices (list (swap-space
- (target (uuid
- "7c3875ab-ccc0-49b5-bdd5-b49909cf3c01")))))
-
- ;; 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 "021E-83B3"
- 'fat32))
- (type "vfat"))
- (file-system
- (mount-point "/")
- (device (uuid
- "b0147644-6bbf-41b8-85c5-0a4c3fce042b"
- 'ext4))
- (type "ext4"))
- (file-system
- (mount-point "/home")
- (device (uuid
- "4cf08e5e-47c3-41b4-bd05-abbe5e6f5590"
- 'ext4))
- (type "ext4")) %base-file-systems))))