;; This "home-environment" file can be passed to 'guix home reconfigure'
;; to reproduce the content of your profile.  This is "symbolic": it only
;; specifies package names.  To reproduce the exact same profile, you also
;; need to capture the channels being used, as returned by "guix describe".
;; See the "Replicating Guix" section in the manual.

(use-modules (gnu home)
	     (gnu packages)
	     (gnu packages emacs)
	     (gnu packages vim)
	     (gnu services)
	     (guix gexp)
	     (gnu home services)
	     (gnu home services shells)
	     (atlas home services dconf)
	     )

(home-environment
  ;; Below is the list of packages that will show up in your
  ;; Home profile, under ~/.guix-home/profile.
  (packages (list
	      emacs
	      neovim))

  ;; Below is the list of Home services.  To search for available
  ;; services, run 'guix home search KEYWORD' in a terminal.
  (services
    (list 
      (service home-dconf-load-service-type
	       #~`((org/gnome/shell
		     (disable-user-extensions #f))
		   (org/gnome/desktop/interface 
		     (color-scheme "prefer-dark"))
		   (org/gnome/mutter
		     (edge-tiling #t))
		   (org/gnome/desktop/input-sources
		     (xkb-options #("caps:escape")))
		   (org/gnome/desktop/wm/preferences
                     (focus-mode "sloppy"))
		   (org/gnome/settings-daemon/plugins/power
      		     (idle-dim #f)
      		     (sleep-inactive-ac-type "nothing"))
		   (org/gnome/gnome-system-monitor
      		     (current-tab "resources"))
		   (org/gnome/desktop/interface
      		     (show-battery-percentage #t))
		   (org/gnome/desktop/peripherals/touchpad
		     (tap-to-click #t))))
      (service home-bash-service-type
	       (home-bash-configuration
		 (bash-profile (list (plain-file 
				       "bash-profile" 
				       "
				       export HISTFILE=$XDG_CACHE_HOME/.bash_history
				       GUIX_PROFILE=/home/mir/.guix-profile
				       . $GUIX_PROFILE/etc/profile
				       "
				       )))
		 (aliases '(("grep" . "grep --color=auto") 
			    ("ll" . "eza -l")
			    ("ls" . "eza")
			    ("vi" . "nvim"))
			  ))))))