diff --git a/home-configuration/home-configuration.scm b/home-configuration/home-configuration.scm index d6bb893..a5124f6 100644 --- a/home-configuration/home-configuration.scm +++ b/home-configuration/home-configuration.scm @@ -8,108 +8,173 @@ (gnu packages) (gnu services) (guix gexp) - (gnu home services shells)) + (radix utils) + (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)) + +(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 Motomachi font ") + (alias ((family "sans-serif") + (prefer (family "Motomachi"))))))) (home-environment - ;; Below is the list of packages that will show up in your - ;; Home profile, under ~/.guix-home/profile. - (packages (specifications->packages (list "flameshot" - "ncmpcpp" - "font-meslo-lg-dz" - "font-meslo-lg" - "gd-tools" - "emacs-org-roam-ui" - "wmctrl" - "telegram-desktop" - "lf" - "ranger" - "ueberzug++" - "fzf" - "emacs-org-roam" - "libime" - "fcitx5-gtk4" - "fcitx5-qt" - "fcitx5-gtk" - "sselp" - "thunar" - "mcomix" - "pinentry" - "goldendict-ng" - "xdg-utils" - "font-google-material-design-icons" - "gst-plugins-good-qt" - "qtmultimedia" - "xpad-module" - "unzip" - "zip" - "emacs-esxml" - "html-xml-utils" - "emacs-rainbow-delimiters" - "aria2" - "xdg-desktop-portal" - "xdg-desktop-portal-gtk" - "xprop" - "nicotine+" - "yt-dlp" - "higan" - "nyxt" - "emacs-nyxt" - "tmux" - "alacritty" - "lm-sensors" - "anki" - "emacs-olivetti" - "foliate" - "emacs-slime" - "python" - "xrdb" - "dbus" - "steam" - "make" - "p7zip" - "cmake" - "element-desktop" - "emacs-dirvish" - "readline" - "curl" - "nix" - "qpdfview" - "xclip" - "font-apple-color-emoji" - "emacs-nerd-icons" - "emacs-telega" - "htop" - "cl-clx" - "neofetch" - "kitty" - "sbcl-stumpwm-ttf-fonts" - "cl-clx-truetype" - "picom" - "feh" - "xmodmap" - "rofi" - "emacs-stumpwm-mode" - "sbcl-stumpwm-net" - "sbcl-stumpwm-cpu" - "sbcl-stumpwm-mem" - "sbcl-stumpwm-disk" - "sbcl-stumpwm-screenshot" - "sbcl-stumpwm-pamixer" - "sbcl-stumpwm-swm-gaps" - "cmus" - "zstd" - "scrot" - "cl-css" - "git" - "gst-plugins-good" - "gst-plugins-bad" - "gstreamer" - "ungoogled-chromium" - "guile" - "icecat" - "pavucontrol-qt" - "mpv" - "emacs"))) + (packages (cons* flameshot + ncmpcpp + ;; gd-tools + wmctrl + lf + ranger + emacs-org-roam + ;; + ;; + ;; + ;; sselp + nano + thunar + mcomix + pinentry + ;; goldendict-ng + xdg-utils + font-google-material-design-icons + gst-plugins-good-qt + ;;unrar + qtmultimedia + sylpheed + ;; xpad-module + unzip + zip + emacs-esxml + html-xml-utils + emacs-rainbow-delimiters + aria2 + xdg-desktop-portal + xdg-desktop-portal-gtk + xprop + ;;nicotine+ + yt-dlp + higan + nyxt + emacs-nyxt + tmux + alacritty + lm-sensors + ;; anki + emacs-olivetti + ;; foliate + emacs-slime + python + xrdb + dbus + ;; steam + ;; make + p7zip + cmake + ;; + emacs-dirvish + readline + curl + qpdfview + xclip + emacs-nerd-icons + emacs-telega + htop + cl-clx + neofetch + kitty + sbcl-stumpwm-ttf-fonts + cl-clx-truetype + picom + feh + xmodmap + rofi + sbcl + stumpwm `(,stumpwm "lib") + emacs-stumpwm-mode + sbcl-stumpwm-net + sbcl-stumpwm-cpu + sbcl-stumpwm-mem + sbcl-stumpwm-disk + sbcl-stumpwm-screenshot + sbcl-stumpwm-pamixer + sbcl-clx + sbcl-stumpwm-swm-gaps + cmus + zstd + ;; suckless-dictpopup + scrot + cl-css + git + gst-plugins-good + gst-plugins-bad + gstreamer + pavucontrol-qt + mpv + emacs + (specifications->packages + (list "steam" + "guile" + "ueberzug++" + "fcitx5-gtk4" + "fcitx5-qt" + "ungoogled-chromium" + "fcitx5-gtk" + "unrar" + "nicotine+" + "foliate" + "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. @@ -122,10 +187,121 @@ ("lf" . "~/.local/bin/lf/lfrun") ("ll" . "ls -l") ("ls" . "ls -p --color=auto") + ("record" . "ffmpeg -f x11grab -r 25 -s 1366x768 -i $DISPLAY -c:v libx264 -pix_fmt yuv420p -preset ultrafast -crf 23 -y /tmp/output.mp4") ("revive" . "xmodmap -e '\\''clear mod4'\\'' && xmodmap -e '\\''keycode 133 = F20'\\''"))) (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")))))))) + "bash_profile"))) + (environment-variables + '(("GUILE_LOAD_PATH" + . "$HOME/dev/guix_channel/ajatt-tools-guix:$GUILE_LOAD_PATH"))) + )) + + + + + (service home-xdg-mime-applications-service-type + (home-xdg-mime-applications-configuration + (default (associate-right + ('nyxt.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 + `("image/gif" + "audio/mpeg" + "audio/ogg" + "audio/opus" + "audio/x-opus+ogg" + "audio/flac" + "video/mp4" + "video/x-matroska" + "video/webm")) + ('nsxiv.desktop + `("image/avif" + "image/bmp" + "image/jpeg" + "image/png" + "image/svg+xml" + "image/webp")) + ('emacs.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" . "emacs") + ("SHELL" . "bash") + ("TERMINAL" . "kitty") + ("VISUAL" . "emacs") + ("WM" . "stumpwm"))))) + + + )