1 files changed, 0 insertions, 58 deletions
diff --git a/systems/mcdowell.scm b/systems/mcdowell.scm
deleted file mode 100644
index 8b9d3ad..0000000
--- a/systems/mcdowell.scm
+++ /dev/null
@@ -1,58 +0,0 @@
-(define-module (systems mcdowell)
-  #:use-module (gnu services)		; service
-  #:use-module (gnu services guix)	; guix-home-service-type
-  #:use-module (gnu system keyboard)    ; keyboard-layout
-  #:use-module (machines portable-bios)	; bootloader-configuration*
-					; file-systems*
-					; firmware*
-					; hardware-groups
-					; initrd*
-					; kernel*
-                                        ; swap-devices*
-  #:use-module (suweren system)		; %suweren-operating-system
-  #:use-module (users id1000)		; uid1000-account
-					; uid1000-home-environment
-					; uid1000-name
-  )
-
-;; ;; string
-;; (define host-name*
-;;   "mcdowell")
-
-;; ;; (record user-account)
-;; (define users*
-;;   (list uid1000-account))
-
-;; ;; record operating-system
-;; (define (operating-system*)
-;;   (use-modules (machines portable-bios)
-;; 	       (suweren system))
-;;   (let* ((home-environments `((,uid1000-name ,(uid1000-home-environment host-name*))))
-
-;; 	 (guix-home (service guix-home-service-type
-;; 			     home-environments))
-
-;; 	 (keyboard-layout* (keyboard-layout "pl"))
-;; 	 (services* (list guix-home))
-;; 	 (timezone* "Europe/Warsaw")
-;; 	 ;; (locale* "en_US.utf8")
-;; 	 )
-;;     ((@ (gnu system) operating-system)
-;;      (inherit %suweren-operating-system)
-;;      (kernel kernel*)
-;;      (bootloader (bootloader-configuration* keyboard-layout*))
-;;      (keyboard-layout keyboard-layout*)
-;;      (initrd initrd*)
-;;      (firmware firmware*)
-;;      (host-name host-name*)
-;;      (file-systems (file-systems* host-name*))
-;;      (swap-devices (swap-devices* host-name*))
-;;      (users users*)
-;;      (timezone timezone*)
-;;      ;; locale*
-;;      (services services*))))
-
-;; (define-public operating-system*
-;;   (operating-system*))
-
-;; operating-system*