(use-modules (gnu)
	     (srfi srfi-1)
	     (gnu packages linux)
	     (gnu packages networking)
	     (gnu packages gnome)
	     (gnu services desktop)
	     (gnu services virtualization)
	     (gnu services sound))
(use-service-modules desktop networking ssh xorg)

(operating-system
  (locale "en_DK.utf8")
  (timezone "Europe/Stockholm")
  (keyboard-layout (keyboard-layout "se"))
  (host-name "guixtop")
  (users (cons* (user-account
                  (name "me")
                  (comment "me")
                  (group "users")
                  (home-directory "/home/me")
                  (supplementary-groups
                    '("wheel" "netdev" "lp" "audio" "video" "kvm" "libvirt")))
                %base-user-accounts))
  (packages
    (append
     (list (specification->package "nss-certs")
	   bluez
	   blueman
	   gnome-bluetooth)
     %base-packages))
  (services
   (append
    (list (service gnome-desktop-service-type)
          (service openssh-service-type)
	  (service libvirt-service-type)
	  (udev-rules-service 'pipewire-add-udev-rules pipewire-0.3)
          (set-xorg-configuration
           (xorg-configuration
            (keyboard-layout keyboard-layout)))
	  (extra-special-file "/lib64/ld-linux-x86-64.so.2"
			      (file-append glibc "/lib/ld-linux-x86-64.so.2"))
	    (bluetooth-service #:auto-enable? #t)
	  )
    (modify-services %desktop-services

		     (gdm-service-type config => (gdm-configuration
						  (inherit config)
						  (wayland? #t))))))
  (bootloader
    (bootloader-configuration
      (bootloader grub-efi-bootloader)
      (targets (list "/boot/efi"))
      (keyboard-layout keyboard-layout)))
  (file-systems
    (cons* (file-system
             (mount-point "/")
             (device
               (uuid "uuid"
                     'btrfs))
             (type "btrfs"))
           (file-system
             (mount-point "/boot/efi")
             (device (uuid "uuid" 'fat32))
             (type "vfat"))
           %base-file-systems)))