;; 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) (kisshot haskell-packages) (radix packages) (gnu packages file) (ajatt packages haskell) (radix packages image-viewers) (gnu home services desktop) (gnu home services gnupg) (gnu packages) (gnu services) (gnu packages java) (gnu packages mate) (gnu packages librewolf) (gnu packages guile-xyz) (gnu packages haskell) (gnu packages gimp) (gnu packages ebook) (gnu home services syncthing) (gnu packages tor) (gnu packages sync) (gnu packages package-management) (gnu packages syncthing) (guix gexp) (gnu packages rust-apps) (gnu home services) (gnu home services shells) (gnu home services fontutils) (gnu home services xdg) (gnu packages image) (gnu packages mpd) (gnu packages disk) (gnu packages emacs-xyz) (gnu packages text-editors) (gnu packages xfce) (gnu packages image-viewers) (gnu packages gnupg) (gnu packages freedesktop) (gnu packages fonts) (gnu packages qt) (gnu packages mail) (gnu packages compression) (gnu packages xml) (gnu packages bittorrent) (gnu packages xorg) (gnu packages gstreamer) (gnu packages xdisorg) (gnu packages video) (gnu packages emulators) (gnu packages web-browsers) (gnu packages tmux) (gnu packages terminals) (gnu packages linux) (gnu packages python) (gnu packages cmake) (gnu packages readline) (gnu packages curl) (gnu packages pdf) (gnu packages glib) (gnu packages admin) (gnu packages lisp-xyz) (gnu packages wm) (gnu packages compton) (gnu packages lisp) (gnu packages music) (gnu packages version-control) (gnu packages lxqt) (gnu packages emacs) (gnu packages haskell-xyz) (srfi srfi-26)) (define fontconfig '(fontconfig (comment " Set subpixel arrangement for all fonts ") (match ((target "font") (edit (@ (name "rgba") (mode "assign")) (const "bgr")) (edit (@ (name "hrgba") (mode "assign")) (const "bgr")) (edit (@ (name "hinting") (mode "assign")) (bool "true"))) (comment " Alias for Migu 1P font ") (alias ((family "sans-serif") (prefer (family "Migu 1P"))))))) (define-syntax-rule (associate-right (association keys) ...) `(,@(map (cut cons <> association) keys) ...)) (home-environment (packages (cons* flameshot pinentry-gtk2 ncmpcpp ;; gd-tools wmctrl lf ranger emacs-org-roam guile-ares-rs emacs-arei ;; multimonitor xset file librewolf arandr ;; ;; ;; ;; sselp syncthing nano gimp thunar ;; net-tools mcomix atril pinentry xdg-utils font-google-material-design-icons gst-plugins-good-qt ;;unrar qtmultimedia sylpheed zpaq ;; xpad-module unzip zip emacs-esxml html-xml-utils emacs-rainbow-delimiters aria2 xdg-desktop-portal xdg-desktop-portal-gtk gnupg xprop ;;nicotine+ nextcloud-client yt-dlp higan librewolf nyxt sbcl-coleslaw emacs-nyxt pinentry-emacs tmux alacritty lm-sensors ;; anki ripgrep emacs-olivetti emacs-deadgrep emacs-rg emacs-dumb-jump ;; foliate emacs-slime python xrdb dbus ;; steam ;; make p7zip tor-client cmake ;; emacs-dirvish readline curl librewolf qpdfview xclip emacs-nerd-icons emacs-telega ;; anki flatpak flatpak-xdg-utils ;;---- htop cl-clx openjdk neofetch kitty picom calibre feh xsel rofi sbcl cmus ;; xmonad xmonad ghc xmobar ;;----- zstd ;; suckless-dictpopup scrot cl-css git gst-plugins-good gst-plugins-bad gstreamer pavucontrol-qt mpv ;; N64 mupen64plus-ui-console ;; emacs ueberzug++ (specifications->packages (append haskell-packages-list (list "steam" "guile" ;; "ueberzug++" "fcitx5-gtk4" "fcitx5-qt" "fcitx5-gtk" "navidrome-bin" "torbrowser" "unrar" "nicotine+" "librewolf" "zpaq" "gimp" "foliate" "tor-client" "make" "element-desktop" "font-apple-color-emoji"))))) ;; Below is the list of Home services. To search for available ;; services, run 'guix home search KEYWORD' in a terminal. (services (list (service home-bash-service-type (home-bash-configuration (aliases '(("analyze_video" . "~/.local/bin/analyze_video.sh") ("ct" . "~/.local/bin/compatibility.sh") ("grep" . "grep --color=auto") ("update" . "guix pull && sudo guix system reconfigure .config/guix/config.scm") ("lf" . "~/.local/bin/lf/lfrun") ("ps2" . "nohup flatpak run --filesystem=/mnt/Data net.pcsx2.PCSX2 > /dev/null 2>&1 &") ("ocr" . "sudo /nix/var/nix/profiles/default/bin/manga_ocr") ("ll" . "ls -l") ("codiff" . "git diff HEAD~1 HEAD") ("pkg-build" . "guix build --check --no-grafts ") ("ls" . "ls -p --color=auto") ("run_code" . "g++ -o main main.cc -Ofast -std=c++23 -s -flto -march=native -I ~/dev/ajatt/hakurei/include/ && ./main") ("rgf" . "rg --files | rg") ("dufh" . "/nix/var/nix/profiles/default/bin/duf -hide-fs tmpfs,ext4,devtmpfs,vfat") ("mpv" . "mpv --audio-pitch-correction=yes --vf=setpts=PTS/1") ("record" . "ffmpeg -f x11grab -r 23 -s 1366x768 -i $DISPLAY -f pulse -i nui_mic_remap -filter_complex '[1:a]volume=2.0[a]' -map 0:v -map '[a]' -c:v libx264 -pix_fmt yuv420p -preset ultrafast -crf 23 -y /tmp/output.mp4") ("isolate" . "guix shell --container --network --preserve='^DISPLAY$' \ --preserve='^XAUTHORITY$' --expose=$XAUTHORITY --expose=/etc/ssl/certs --no-cwd "))) (bashrc (list (local-file "/home/hashirama/src/guix-config/.bashrc" "bashrc"))) (bash-profile (list (local-file "/home/hashirama/src/guix-config/.bash_profile" "bash_profile"))) (environment-variables '( ("GTK_IM_MODULE" . "fcitx") ("QT_IM_MODULE" . "fcitx") ("GUIX_GTK2_IM_MODULE_FILE" . "/run/current-system/profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache") ("GUIX_GTK3_IM_MODULE_FILE" . "/run/current-system/profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache") ("XMODIFIERS=@im=" . "fcitx") ("INPUT_METHOD" . "fcitx") ("XIM_PROGRAM" . "fcitx") ("GLFW_IM_MODULE" . "ibus") ("GUILE_LOAD_PATH" . "$HOME/dev/guix_channel/ajatt-tools-guix:$HOME/src/guix-config:$GUILE_LOAD_PATH") ("XMONAD_CONFIG_DIR" . "$HOME/.xmonad") ("GUIX_PROFILE=$HOME/.config/guix/current" . "$GUIX_PROFILE/etc/profile") )) )) (service home-syncthing-service-type (for-home (syncthing-configuration (user "hashirama")))) (service home-gpg-agent-service-type (home-gpg-agent-configuration (pinentry-program (file-append gpa "/bin/pinentry-gtk-2")) (ssh-support? #t))) (service home-xdg-mime-applications-service-type (home-xdg-mime-applications-configuration (default (associate-right ('librewolf.desktop `("text/html" "application/xhtml+xml" "application/x-extension-htm" "application/x-extension-xhtml" "application/x-extension-xht" "x-scheme-handler/http" "x-scheme-handler/https")) ('emacs.desktop `("text/plain" "text/troff" "text/xml" "text/x-c" "text/x-c++" "text/x-diff" "text/x-lisp" "text/x-scheme" "text/x-shellscript" "text/x-tex")) ('lf.desktop `("inode/directory" "x-scheme-handler/ftp" "x-scheme-handler/nfs" "x-scheme-handler/smb" "x-scheme-handler/ssh" "application/x-directory")) ('mpv.desktop `("application/mxf" "application/ogg" "application/sdp" "application/smil" "application/streamingmedia" "application/vnd.apple.mpegurl" "application/vnd.ms-asf" "application/vnd.rn-realmedia" "application/vnd.rn-realmedia-vbr" "application/x-cue" "application/x-extension-m4a" "application/x-extension-mp4" "application/x-matroska" "application/x-mpegurl" "application/x-ogg" "application/x-ogm" "application/x-ogm-audio" "application/x-ogm-video" "application/x-shorten" "application/x-smil" "application/x-streamingmedia" "audio/3gpp" "audio/3gpp2" "audio/AMR" "audio/aac" "audio/ac3" "audio/aiff" "audio/amr-wb" "audio/dv" "audio/eac3" "audio/flac" "audio/m3u" "audio/m4a" "audio/mp1" "audio/mp2" "audio/mp3" "audio/mp4" "audio/mpeg" "audio/mpeg2" "audio/mpeg3" "audio/mpegurl" "audio/mpg" "audio/musepack" "audio/ogg" "audio/opus" "audio/rn-mpeg" "audio/scpls" "audio/vnd.dolby.heaac.1" "audio/vnd.dolby.heaac.2" "audio/vnd.dts" "audio/vnd.dts.hd" "audio/vnd.rn-realaudio" "audio/vorbis" "audio/wav" "audio/webm" "audio/x-aac" "audio/x-adpcm" "audio/x-aiff" "audio/x-ape" "audio/x-m4a" "audio/x-matroska" "audio/x-mp1" "audio/x-mp2" "audio/x-mp3" "audio/x-mpegurl" "audio/x-mpg" "audio/x-ms-asf" "audio/x-ms-wma" "audio/x-musepack" "audio/x-pls" "audio/x-pn-au" "audio/x-pn-realaudio" "audio/x-pn-wav" "audio/x-pn-windows-pcm" "audio/x-realaudio" "audio/x-scpls" "audio/x-shorten" "audio/x-tta" "audio/x-vorbis" "audio/x-vorbis+ogg" "audio/x-wav" "audio/x-wavpack" "video/3gp" "video/3gpp" "video/3gpp2" "video/avi" "video/divx" "video/dv" "video/fli" "video/flv" "video/mkv" "video/mp2t" "video/mp4" "video/mp4v-es" "video/mpeg" "video/msvideo" "video/ogg" "video/quicktime" "video/vnd.divx" "video/vnd.mpegurl" "video/vnd.rn-realvideo" "video/webm" "video/x-avi" "video/x-flc" "video/x-flic" "video/x-flv" "video/x-m4v" "video/x-matroska" "video/x-mpeg2" "video/x-mpeg3" "video/x-ms-afs" "video/x-ms-asf" "video/x-ms-wmv" "video/x-ms-wmx" "video/x-ms-wvxvideo" "video/x-msvideo" "video/x-ogm" "video/x-ogm+ogg" "video/x-theora" "video/x-theora+ogg")) ('nsxiv.desktop `("image/bmp" "image/gif" "image/jpeg" "image/jpg" "image/pjpeg" "image/png" "image/tiff" "image/x-bmp" "image/x-pcx" "image/x-png" "image/x-portable-anymap" "image/x-portable-bitmap" "image/x-portable-graymap" "image/x-portable-pixmap" "image/x-tga" "image/x-xbitmap" "image/heif" "image/avif" "image/x-icon")) ('atril.desktop `("image/vnd.djvu")) ('foliate.desktop `("application/epub+zip")) ('sioyek.desktop `("application/pdf")) )))) (simple-service 'font-antialias home-fontconfig-service-type (list "~/.local/share/fonts" fontconfig)) (simple-service 'bash-fancy-prompt home-bash-service-type (home-bash-extension (environment-variables '(("PS1" . "\\u \\wλ "))))) (simple-service 'environment-variables-service home-environment-variables-service-type `(#|Shells|# ("PATH" . "$HOME/.local/bin:$PATH") ("XINITRC" . "$XDG_CONFIG_HOME/.xinitrc") #|Guile|# ("GUILE_WARN_DEPRECATED" . "detailed") ("GUILE_LOAD_PATH" . "$HOME/dev/guix_channel/ajatt-tools-guix:$GUILE_LOAD_PATH") #|IME|# ("GTK_IM_MODULE" . "fcitx") ("QT_IM_MODULE" . "fcitx") ("XMODIFIERS" . "@im=fctix") #|Dictionary|# ("STARDICT_DATA_DIR" . "/mnt/Data/Japanese_Resources/languages-study(japanesAndRussian)/dicts/stardict/being_used") #|Language|# ("LANG" . "en_US.UTF-8") ("LANGUAGE" . "en_US.UTF-8") ("LC_COLLATE" . "C") #|Default applications|# ("BROWSER" . "nyxt") ("EDITOR" . "emacs") ("FCEDIT" . "emacs") ("PAGER" . "less") ("READER" . "foliate") ("SHELL" . "bash") ("TERMINAL" . "alacritty") ("VISUAL" . "nsxiv") ("WM" . "xmonad"))))) )