diff options
Diffstat (limited to '.config/guix/nott.scm')
| -rw-r--r-- | .config/guix/nott.scm | 79 |
1 files changed, 0 insertions, 79 deletions
diff --git a/.config/guix/nott.scm b/.config/guix/nott.scm deleted file mode 100644 index b9418c6..0000000 --- a/.config/guix/nott.scm +++ /dev/null @@ -1,79 +0,0 @@ -(define-module (nott) - #:use-module (gnu) - #:use-module (guix) - #:use-module (packages packages) - #:use-module (ymir) - #:use-module (srfi srfi-1)) - -(use-service-modules desktop mcron networking spice ssh xorg sddm) -(use-package-modules bootloaders certs fonts nvi package-management wget xorg) - -;;; Commentary: -;;; -;;; nott is a vm -;;; -;;; Code: - - -(operating-system - (inherit ymir) - (host-name "nott") - - (label (string-append "GNU Guix " - (or (getenv "GUIX_DISPLAYED_VERSION") - (package-version guix)))) - - (firmware '()) - - (packages - `(,@bd-packages-system)) - (services - (append (list (service xfce-desktop-service-type) - - (service slim-service-type - (slim-configuration - (auto-login? #t) - (default-user username) - (xorg-configuration - (xorg-configuration - (modules (cons xf86-video-qxl - %default-xorg-modules)))))) - - (service openssh-service-type) - - (service spice-vdagent-service-type) - - (service dhcp-client-service-type)) - - (remove (lambda (service) - (let ((type (service-kind service))) - (or (memq type - (list gdm-service-type - sddm-service-type - wpa-supplicant-service-type - cups-pk-helper-service-type - network-manager-service-type - modem-manager-service-type)) - (eq? 'network-manager-applet - (service-type-name type))))) - (modify-services %desktop-services - (login-service-type config => - (login-configuration - (inherit config))) - - (guix-service-type config => - (guix-configuration - (inherit config) - (guix (current-guix)))))))) - - (bootloader (bootloader-configuration - (bootloader grub-bootloader) - (targets (list "/dev/sda1")) - (terminal-outputs '(console)))) - - (file-systems (cons (file-system - (mount-point "/") - (device "/dev/sda2") - (type "ext4")) %base-file-systems)) - - (name-service-switch %mdns-host-lookup-nss)) |
