dotfiles/config.scm

;; 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 services)
             (guix gexp)
             (gnu home services shells))

(define guix-config-path "/src/guix-config")

(define (in-config path)
  (string-append (getenv "HOME") guix-config-path "/" path))

(home-environment
 (packages (specifications->packages (list "acpica"
					   "alacritty"
					   "audacity"
					   "blender"
					   "blueman"
					   "breeze"
					   "breeze-gtk"
					   "breeze-icons"
					   "calc"
					   "clamav"
					   "clipmenu"
					   "cowsay"
					   "daikichi"
					   "desktop-file-utils"
					   "direnv"
					   "emacs"
					   "falkon"
					   "font-hack"
					   "fortunes-jkirchartz"
					   "gimp"
					   "gnome-keyring"
					   "h-client"
					   "handbrake"
					   "htop"
					   "imagemagick"
					   "icecat"
					   "inkscape"
					   "inxi"
					   "jami"
					   "jq"
					   "kdeconnect"
					   "kdenlive"
					   "kdiskmark"
					   "keychain"
					   "kid3"
					   "libnotify"
					   "libreoffice"
					   "lshw"
					   "maim"
					   "meld"
					   "mkvtoolnix:gui"
					   "mu"
					   "mupdf"
					   "nextcloud-client"
					   "nnn"
					   "nsxiv"
					   "nyxt"
					   "offlineimap3"
					   "pass-otp"
					   "password-store"
					   "pavucontrol"
					   "picom"
					   "pigz"
					   "pv"
					   "python-wrapper"
					   "qemu"
					   "qutebrowser"
					   "redshift"
					   "rofi"
					   "rxvt-unicode"
					   "socat"
					   "supertuxkart"
					   "tabbed"
					   "telegram-desktop"
					   "thunar-archive-plugin"
					   "transmission"
					   "transmission:gui"
					   "transmission-remote-gtk"
					   "unzip"
					   "virt-manager"
					   "vlc"
					   "vorbis-tools"
					   "xsel"
					   "yt-dlp"
					   "zathura"
					   "zathura-cb"
					   "zathura-djvu"
					   "zathura-pdf-mupdf"
					   "zathura-ps"
					   "zbar"
					   "zip")))

 (services
  (list (service home-bash-service-type
                 (home-bash-configuration
                  (aliases '(;; Modified commands
			     ("l" . "ls -CF")
                             ("la" . "ls -A")
                             ;; ("ll" . "ls -alF")
                             ;; ("ls" . "ls -p --color=auto")
			     ;; ("grep" . "grep --color=auto")
			     
			     ;; Utility commands
			     ("mpc" . "ncmpcpp")
			     ("emc" . "em -nw")
			     ("acortar" . "curl -s \"http://is.gd/create.php?format=simple&url=$(xsel -po)\" | xsel -pi")
                             ("apagar" . "sudo shutdown -h 14:20")
                             ("bajar" . "plowdown")
			     ("subir" . "plowup")
			     ("search-word" . "find . -type f -print0 | xargs -0 grep -l ")
			     ("s" . "screen")
                             ("screen" . "screen -aAxRl")
			     ("jpg-optimized" . "find . -name *.jpg -exec jpegoptim --max=80 -t '\\'''\\'' {} \\;")
			     ("prime-disable" . "export DRI_PRIME=0")
                             ("prime-enable" . "export DRI_PRIME=1")
                             ("mu4e" . "em -c -n --eval '\\''(mu4e)'\\''")
			     ("webcam" . "webcam_mods bg-blur")

			     ;; Custom ~/.scripts commands
			     ("pass" . "$HOME/.scripts/pass-utils/passp")
                             ("pomf" . "$HOME/.scripts/pomf.py")
                             ("pomf-w" . "$HOME/.scripts/scrotpomf.sh")			     
                             ("capas2png" . "$HOME/.scripts/Inkscape/layers2pngs.py")			     
                             ("davpush" . "$HOME/.scripts/davpush.pl")
			     ("tvgnu" . "$HOME/.scripts/TVenGNU.sh")
			     ("haste" . "HASTE_SERVER=http://vte.distopico.info haste")
                             ("hastebin" . "$HOME/.scripts/haste.sh")

			     ;; Alias directories
                             ("home" . "cd $HOME/")
                             ("descargas" . "cd $HOME/Downloads")
                             ("escritorio" . "cd $HOME/Desktop")
                             ("musica" . "cd $HOME/Music")
                             ("imagenes" . "cd $HOME/Pictures")
                             ("publico" . "cd $HOME/Public")
                             ("videos" . "cd $HOME/Videos")

			     ;; Dist Parabola
                             ("update-grub" . "sudo grub-mkconfig -o /boot/grub/grub.cfg")

			     ;; Dist Debian Based
                             ("repo" . "sudo add-apt-repository ")
                             ("build-dep" . "sudo apt-get build-dep ")
                             ("dist-upgrade" . "sudo apt-get dist-upgrade")
                             ("search-app" . "sudo aptitude search")
                             ("update-full" . "sudo aptitude full-upgrade -y && sudo aptitude clean")

			     ;; Dist Guix
                             ("guix-reconfigure" . "sudo guix system reconfigure /etc/config.scm; sudo update-boot")))
                  (bashrc (list (local-file
                                 (in-config ".bashrc")
                                 "bashrc")))
                  (bash-profile (list (local-file
                                       (in-config ".bash_profile")
                                       "bash_profile"))))))))