(use-modules (gnu)
	     (gnu packages)
 	     (gnu services)
 	     (gnu system)
 	     (guix monads))

(use-package-modules
   emacs conkeror ratpoison feh grub gawk perl ncurses aspell fonts
   version-control ssh wget video xiph file compression admin linux xorg)

(use-service-modules
   base networking ssh dbus xorg)

;; -------------------------------------------------------------------------------------

(operating-system
  (host-name "Guixotic")
  (timezone "America/Chicago")
  (bootloader (grub-configuration
	       (device "/dev/sda")))
  (file-systems (cons (file-system
		       (device "/dev/sda1")
				(title 'label)
		       (mount-point "/")
		       (type "ext4"))
		      %base-file-systems))
  (users (list (user-account
		(name "gnuser")
		(group "gnuser")
		(password "")
		(uid 1000)
		(supplementary-groups '("wheel","users","audio","video","dialout"))
		(home-directory "/home/gnuser"))))
  (groups (cons (user-group
		 (name "gnuser")
		 (id 1000))
		%base-groups))

  (packages (cons* grub
		   tar gzip bzip2 xz file diffutils gawk perl
                   ncurses git wget openssh
		   isc-dhcp wireless-tools wpa-supplicant		   
		   xset setxkbmap xkill
                   aspell aspell-dict-en font-dejavu font-terminus
                   feh alsa-utils vorbis-tools ffmpeg mplayer
		   xterm ratpoison conkeror
                   emacs emms magit geiser paredit
		   %base-packages))

  (services (cons* (dhcp-client-service #:dhcp isc-dhcp)
                   (dbus-service '())
		   (slim-service)
		   %base-services)))