add syncthing service

main
千住柱間 2024-03-06 13:46:35 +00:00
parent ce62ec59cc
commit 46e4068e1a
1 changed files with 241 additions and 235 deletions

View File

@ -8,6 +8,8 @@
(gnu packages) (gnu packages)
(gnu services) (gnu services)
(gnu packages haskell) (gnu packages haskell)
(gnu home services syncthing)
(gnu packages syncthing)
(guix gexp) (guix gexp)
(radix utils) (radix utils)
(gnu home services) (gnu home services)
@ -64,256 +66,260 @@
(const "bgr")) (const "bgr"))
(edit ((name "hinting") (mode "assign")) (edit ((name "hinting") (mode "assign"))
(bool "true"))) (bool "true")))
(comment " Alias for Motomachi font ") (comment " Alias for Motomachi font ")
(alias ((family "sans-serif") (alias ((family "sans-serif")
(prefer (family "Motomachi"))))))) (prefer (family "Motomachi")))))))
(home-environment (home-environment
(packages (cons* flameshot (packages (cons* flameshot
ncmpcpp ncmpcpp
;; gd-tools ;; gd-tools
wmctrl wmctrl
lf lf
ranger ranger
emacs-org-roam emacs-org-roam
;; ;;
;; ;;
;; ;;
;; sselp ;; sselp
nano syncthing
thunar nano
mcomix thunar
pinentry mcomix
;; goldendict-ng pinentry
xdg-utils ;; goldendict-ng
font-google-material-design-icons xdg-utils
gst-plugins-good-qt font-google-material-design-icons
;;unrar gst-plugins-good-qt
qtmultimedia ;;unrar
sylpheed qtmultimedia
;; xpad-module sylpheed
unzip ;; xpad-module
zip unzip
emacs-esxml zip
html-xml-utils emacs-esxml
emacs-rainbow-delimiters html-xml-utils
aria2 emacs-rainbow-delimiters
xdg-desktop-portal aria2
xdg-desktop-portal-gtk xdg-desktop-portal
gnupg xdg-desktop-portal-gtk
xprop gnupg
;;nicotine+ xprop
yt-dlp ;;nicotine+
higan yt-dlp
nyxt higan
emacs-nyxt nyxt
tmux emacs-nyxt
alacritty tmux
lm-sensors alacritty
;; anki lm-sensors
emacs-olivetti ;; anki
emacs-olivetti
;; foliate ;; foliate
emacs-slime emacs-slime
python python
xrdb xrdb
dbus dbus
;; steam ;; steam
;; make ;; make
p7zip p7zip
cmake cmake
;; ;;
emacs-dirvish emacs-dirvish
readline readline
curl curl
qpdfview qpdfview
xclip xclip
emacs-nerd-icons emacs-nerd-icons
emacs-telega emacs-telega
htop htop
cl-clx cl-clx
neofetch neofetch
kitty kitty
sbcl-stumpwm-ttf-fonts sbcl-stumpwm-ttf-fonts
cl-clx-truetype cl-clx-truetype
picom picom
feh feh
xmodmap xmodmap
rofi rofi
sbcl sbcl
stumpwm `(,stumpwm "lib") stumpwm `(,stumpwm "lib")
emacs-stumpwm-mode emacs-stumpwm-mode
sbcl-stumpwm-net sbcl-stumpwm-net
sbcl-stumpwm-cpu sbcl-stumpwm-cpu
sbcl-stumpwm-mem sbcl-stumpwm-mem
sbcl-stumpwm-disk sbcl-stumpwm-disk
sbcl-stumpwm-screenshot sbcl-stumpwm-screenshot
sbcl-stumpwm-pamixer sbcl-stumpwm-pamixer
sbcl-clx sbcl-clx
sbcl-stumpwm-swm-gaps sbcl-stumpwm-swm-gaps
cmus cmus
;; xmonad ;; xmonad
xmonad xmonad
ghc ghc
xmobar xmobar
ghc-xmonad-contrib ghc-xmonad-contrib
;;----------------- ;;-----------------
zstd zstd
;; suckless-dictpopup ;; suckless-dictpopup
scrot scrot
cl-css cl-css
git git
gst-plugins-good gst-plugins-good
gst-plugins-bad gst-plugins-bad
gstreamer gstreamer
pavucontrol-qt pavucontrol-qt
mpv mpv
emacs emacs
(specifications->packages (specifications->packages
(list "steam" (list "steam"
"guile" "guile"
"ueberzug++" "ueberzug++"
"fcitx5-gtk4" "fcitx5-gtk4"
"fcitx5-qt" "fcitx5-qt"
"ungoogled-chromium" "ungoogled-chromium"
"fcitx5-gtk" "fcitx5-gtk"
"unrar" "unrar"
"nicotine+" "nicotine+"
"foliate" "foliate"
"make" "make"
"element-desktop" "element-desktop"
"font-apple-color-emoji")))) "font-apple-color-emoji"))))
;; Below is the list of Home services. To search for available ;; Below is the list of Home services. To search for available
;; services, run 'guix home search KEYWORD' in a terminal. ;; services, run 'guix home search KEYWORD' in a terminal.
(services (services
(list (service home-bash-service-type (list (service home-bash-service-type
(home-bash-configuration (home-bash-configuration
(aliases '(("analyze_video" . "~/.local/bin/analyze_video.sh") (aliases '(("analyze_video" . "~/.local/bin/analyze_video.sh")
("ct" . "~/.local/bin/compatibility.sh") ("ct" . "~/.local/bin/compatibility.sh")
("grep" . "grep --color=auto") ("grep" . "grep --color=auto")
("lf" . "~/.local/bin/lf/lfrun") ("lf" . "~/.local/bin/lf/lfrun")
("ll" . "ls -l") ("ll" . "ls -l")
("ls" . "ls -p --color=auto") ("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") ("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'\\''"))) ("revive" . "xmodmap -e '\\''clear mod4'\\'' && xmodmap -e '\\''keycode 133 = F20'\\''")))
(bashrc (list (local-file (bashrc (list (local-file
"/home/hashirama/src/guix-config/.bashrc" "/home/hashirama/src/guix-config/.bashrc"
"bashrc"))) "bashrc")))
(bash-profile (list (local-file (bash-profile (list (local-file
"/home/hashirama/src/guix-config/.bash_profile" "/home/hashirama/src/guix-config/.bash_profile"
"bash_profile"))) "bash_profile")))
(environment-variables (environment-variables
'( '(
("GUILE_LOAD_PATH" ("GUILE_LOAD_PATH"
. "$HOME/dev/guix_channel/ajatt-tools-guix:$GUILE_LOAD_PATH") . "$HOME/dev/guix_channel/ajatt-tools-guix:$GUILE_LOAD_PATH")
("XMONAD_CONFIG_DIR" ("XMONAD_CONFIG_DIR"
. "$HOME/.xmonad") . "$HOME/.xmonad")
)) ))
)) ))
(service home-syncthing-service-type
(for-home
(syncthing-configuration
(user "hashirama"))))
(service home-xdg-mime-applications-service-type (service home-xdg-mime-applications-service-type
(home-xdg-mime-applications-configuration (home-xdg-mime-applications-configuration
(default (associate-right (default (associate-right
('nyxt.desktop ('nyxt.desktop
`("text/html" `("text/html"
"application/xhtml+xml" "application/xhtml+xml"
"application/x-extension-htm" "application/x-extension-htm"
"application/x-extension-xhtml" "application/x-extension-xhtml"
"application/x-extension-xht" "application/x-extension-xht"
"x-scheme-handler/http" "x-scheme-handler/http"
"x-scheme-handler/https")) "x-scheme-handler/https"))
('emacs.desktop ('emacs.desktop
`("text/plain" `("text/plain"
"text/troff" "text/troff"
"text/xml" "text/xml"
"text/x-c" "text/x-c"
"text/x-c++" "text/x-c++"
"text/x-diff" "text/x-diff"
"text/x-lisp" "text/x-lisp"
"text/x-scheme" "text/x-scheme"
"text/x-shellscript" "text/x-shellscript"
"text/x-tex")) "text/x-tex"))
('lf.desktop ('lf.desktop
`("inode/directory" `("inode/directory"
"x-scheme-handler/ftp" "x-scheme-handler/ftp"
"x-scheme-handler/nfs" "x-scheme-handler/nfs"
"x-scheme-handler/smb" "x-scheme-handler/smb"
"x-scheme-handler/ssh" "x-scheme-handler/ssh"
"application/x-directory")) "application/x-directory"))
('mpv.desktop ('mpv.desktop
`("image/gif" `("image/gif"
"audio/mpeg" "audio/mpeg"
"audio/ogg" "audio/ogg"
"audio/opus" "audio/opus"
"audio/x-opus+ogg" "audio/x-opus+ogg"
"audio/flac" "audio/flac"
"video/mp4" "video/mp4"
"video/x-matroska" "video/x-matroska"
"video/webm")) "video/webm"))
('nsxiv.desktop ('nsxiv.desktop
`("image/avif" `("image/avif"
"image/bmp" "image/bmp"
"image/jpeg" "image/jpeg"
"image/png" "image/png"
"image/svg+xml" "image/svg+xml"
"image/webp")) "image/webp"))
('emacs.desktop ('emacs.desktop
`("image/vnd.djvu")) `("image/vnd.djvu"))
('foliate.desktop ('foliate.desktop
`("application/epub+zip")) `("application/epub+zip"))
('sioyek.desktop ('sioyek.desktop
`("application/pdf")) `("application/pdf"))
)))) ))))
(simple-service 'font-antialias (simple-service 'font-antialias
home-fontconfig-service-type home-fontconfig-service-type
(list "~/.local/share/fonts" fontconfig)) (list "~/.local/share/fonts" fontconfig))
(simple-service 'bash-fancy-prompt (simple-service 'bash-fancy-prompt
home-bash-service-type home-bash-service-type
(home-bash-extension (home-bash-extension
(environment-variables (environment-variables
'(("PS1" . "\\u \\wλ "))))) '(("PS1" . "\\u \\wλ ")))))
(simple-service 'environment-variables-service (simple-service 'environment-variables-service
home-environment-variables-service-type home-environment-variables-service-type
`(#|Shells|# `(#|Shells|#
("PATH" . "$HOME/.local/bin:$PATH") ("PATH" . "$HOME/.local/bin:$PATH")
("XINITRC" . "$XDG_CONFIG_HOME/.xinitrc") ("XINITRC" . "$XDG_CONFIG_HOME/.xinitrc")
#|Guile|# #|Guile|#
("GUILE_WARN_DEPRECATED" . "detailed") ("GUILE_WARN_DEPRECATED" . "detailed")
("GUILE_LOAD_PATH" ("GUILE_LOAD_PATH"
. "$HOME/dev/guix_channel/ajatt-tools-guix:$GUILE_LOAD_PATH") . "$HOME/dev/guix_channel/ajatt-tools-guix:$GUILE_LOAD_PATH")
#|IME|# #|IME|#
("GTK_IM_MODULE" . "fcitx") ("GTK_IM_MODULE" . "fcitx")
("QT_IM_MODULE" . "fcitx") ("QT_IM_MODULE" . "fcitx")
("XMODIFIERS" . "@im=fctix") ("XMODIFIERS" . "@im=fctix")
#|Dictionary|# #|Dictionary|#
("STARDICT_DATA_DIR" . "/mnt/Data/Japanese_Resources/languages-study(japanesAndRussian)/dicts/stardict/being_used") ("STARDICT_DATA_DIR" . "/mnt/Data/Japanese_Resources/languages-study(japanesAndRussian)/dicts/stardict/being_used")
#|Language|# #|Language|#
("LANG" . "en_US.UTF-8") ("LANG" . "en_US.UTF-8")
("LANGUAGE" . "en_US.UTF-8") ("LANGUAGE" . "en_US.UTF-8")
("LC_COLLATE" . "C") ("LC_COLLATE" . "C")
#|Default applications|# #|Default applications|#
("BROWSER" . "nyxt") ("BROWSER" . "nyxt")
("EDITOR" . "emacs") ("EDITOR" . "emacs")
("FCEDIT" . "emacs") ("FCEDIT" . "emacs")
("PAGER" . "less") ("PAGER" . "less")
("READER" . "emacs") ("READER" . "emacs")
("SHELL" . "bash") ("SHELL" . "bash")
("TERMINAL" . "kitty") ("TERMINAL" . "kitty")
("VISUAL" . "emacs") ("VISUAL" . "emacs")
("WM" . "xmonad"))))) ("WM" . "xmonad")))))
) )