(use-modules
  (gnu home)
  (gnu packages)
  (gnu packages base)
  (gnu services)
  (guix gexp)
  (gnu home services shells))


(define %enable-extra-profiles
  (plain-file "enable-profiles" 
               "for i in $GUIX_EXTRA_PROFILES/*; do
  profile=$i/$(basename \"$i\")
  if [ -f \"$profile\"/etc/profile ]; then
    GUIX_PROFILE=\"$profile\"
   . \"$GUIX_PROFILE\"/etc/profile
  fi
  unset profile
done"))


(home-environment
  (services
    (list (service
            home-bash-service-type
            (home-bash-configuration
	     (environment-variables 
	      '(("GUIX_EXTRA_PROFILES" . "/home/flo/.extra-profiles")
                ;;("ALTERNATE_EDITOR" . "\"\"")
                ("EDITOR" . "\"emacsclient -nw -q\"")
                ("VISUAL" . "\"emacsclient -c -a \"\"\"")
                ("GIT_EDITOR" . "\"emacs -nw -q\"")))	
              (aliases
                '(("cp" . "cp -i")
                  ("df" . "df -h")
                  ("egrep='egrep --colour" . "auto")
                  ("fgrep='fgrep --colour" . "auto")
                  ("free" . "free -m")
                  ("grep='grep --colour" . "auto")
                  ("ls='ls --color" . "auto")
                  ("more" . "less")
                  ("np" . "nano -w PKGBUILD")))
              (bashrc
                (list (local-file
                        "/home/flo/.config/guix/home/.bashrc"
                        "bashrc")))
              (bash-profile
                (list %enable-extra-profiles))	
              (bash-logout
               (list (local-file
                      "/home/flo/.config/guix/home/.bash_logout"
                      "bash_logout"))))))))