(define-module (config systems base)
  #:use-module (gnu)
  #:use-module (gnu packages)
  #:use-module (guix)
  #:use-module (guix channels)
  #:use-module (guix packages)
  #:export (system-base))
(use-service-modules networking
		     ssh
		     xorg)

(define system-base
  (operating-system
   (locale "en_US.utf8")
   (timezone "Etc/UTC")
   (keyboard-layout (keyboard-layout "us"))
   (host-name "guixsd")

   (users %base-user-accounts)

   ;; The bootloader and filesystem configuration shall be replaced,
   ;; depending on each machine's configuration
   (bootloader (bootloader-configuration
                (bootloader grub-bootloader)
                (targets '("/boot/efi"))
                (keyboard-layout keyboard-layout)))

   (file-systems (cons (file-system
                        (mount-point "/")
                        (device "/dev/sda1")
                        (type "btrfs"))
                       %base-file-systems))
   (services
    (append (list
             (service openssh-service-type)
             (set-xorg-configuration
              (xorg-configuration (keyboard-layout keyboard-layout))))
            %desktop-services))

   (packages
    (append
     (specifications->packages (list
				"curl"
				"git"
				"ncurses"
        			"rsync"))
     %base-packages))))