Update config.scm
parent
5694058990
commit
c3b41a4aab
455
config.scm
455
config.scm
|
|
@ -1,4 +1,4 @@
|
||||||
; This is an operating system configuration generated
|
; This is an operating system configuration generated
|
||||||
;; by the graphical installer.
|
;; by the graphical installer.
|
||||||
;;
|
;;
|
||||||
;; Once installation is complete, you can learn and modify
|
;; Once installation is complete, you can learn and modify
|
||||||
|
|
@ -12,10 +12,19 @@
|
||||||
(use-modules
|
(use-modules
|
||||||
(gnu)
|
(gnu)
|
||||||
(guix packages)
|
(guix packages)
|
||||||
|
(ajatt packages dictionaries)
|
||||||
|
(ajatt packages suckless)
|
||||||
|
(ajatt packages readers)
|
||||||
|
(ajatt packages audio)
|
||||||
(rosenthal packages binaries)
|
(rosenthal packages binaries)
|
||||||
(rosenthal packages emacs-xyz)
|
(rosenthal packages emacs-xyz)
|
||||||
|
(radix services admin)
|
||||||
|
(radix packages image-viewers)
|
||||||
|
(gnu packages disk)
|
||||||
(guix transformations)
|
(guix transformations)
|
||||||
(gnu packages python-xyz)
|
(gnu packages python-xyz)
|
||||||
|
(gnu packages fonts)
|
||||||
|
(gnu packages pdf)
|
||||||
(gnu packages audio)
|
(gnu packages audio)
|
||||||
(gnu packages librewolf)
|
(gnu packages librewolf)
|
||||||
(gnu packages sync)
|
(gnu packages sync)
|
||||||
|
|
@ -35,6 +44,7 @@
|
||||||
(rde features bluetooth)
|
(rde features bluetooth)
|
||||||
(gnu packages gcc)
|
(gnu packages gcc)
|
||||||
(gnu packages pulseaudio)
|
(gnu packages pulseaudio)
|
||||||
|
(gnu packages mail)
|
||||||
(gnu packages enchant)
|
(gnu packages enchant)
|
||||||
(gnu packages hunspell)
|
(gnu packages hunspell)
|
||||||
(gnu packages upnp)
|
(gnu packages upnp)
|
||||||
|
|
@ -95,6 +105,7 @@
|
||||||
(guix inferior)
|
(guix inferior)
|
||||||
(gnu packages networking)
|
(gnu packages networking)
|
||||||
(nongnu packages compression)
|
(nongnu packages compression)
|
||||||
|
(nongnu packages messaging)
|
||||||
(nongnu packages linux))
|
(nongnu packages linux))
|
||||||
|
|
||||||
|
|
||||||
|
|
@ -116,6 +127,14 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;; general rules for doas
|
||||||
|
(define general
|
||||||
|
(list (permit (identity ":wheel")
|
||||||
|
(setenv
|
||||||
|
`(("GUILE_LOAD_PATH" . #t)
|
||||||
|
("GUILE_LOAD_COMPILED_PATH" . #t))))))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
(define my-kernel linux-6.1)
|
(define my-kernel linux-6.1)
|
||||||
|
|
||||||
|
|
@ -133,9 +152,9 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
|
||||||
|
|
||||||
(locale "en_US.utf8")
|
(locale "en_US.utf8")
|
||||||
(kernel-arguments (list "modprobe.blacklist=hid-nintendo"
|
(kernel-arguments (list "modprobe.blacklist=hid-nintendo"
|
||||||
"noatime"
|
"noatime"
|
||||||
|
|
||||||
))
|
))
|
||||||
(timezone "America/Manaus")
|
(timezone "America/Manaus")
|
||||||
(keyboard-layout (keyboard-layout "us"))
|
(keyboard-layout (keyboard-layout "us"))
|
||||||
(host-name "lisp-machine")
|
(host-name "lisp-machine")
|
||||||
|
|
@ -156,153 +175,182 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
|
||||||
;; under their own account: use 'guix search KEYWORD' to search
|
;; under their own account: use 'guix search KEYWORD' to search
|
||||||
;; for packages and 'guix install PACKAGE' to install a package.
|
;; for packages and 'guix install PACKAGE' to install a package.
|
||||||
(packages (append (list
|
(packages (append (list
|
||||||
my-zfs
|
my-zfs
|
||||||
;;emacs-org-roam
|
;;emacs-org-roam
|
||||||
;;emacs-org-roam-ui
|
;;emacs-org-roam-ui
|
||||||
;; -----
|
;; -----
|
||||||
;;necessary for nyxt
|
;;necessary for nyxt
|
||||||
gstreamer
|
gstreamer
|
||||||
gst-plugins-bad
|
gst-plugins-bad
|
||||||
gst-plugins-good
|
gst-plugins-good
|
||||||
;;------
|
;;------
|
||||||
nyxt
|
nyxt
|
||||||
;;------
|
;;------
|
||||||
cmus
|
cmus
|
||||||
emacs-ox-hugo
|
emacs-ox-hugo
|
||||||
sbcl-coleslaw
|
emacs-dirvish
|
||||||
numix-gtk-theme
|
qt-creator
|
||||||
tor
|
sbcl-coleslaw
|
||||||
python-psutil
|
numix-gtk-theme
|
||||||
python-schedule
|
tor
|
||||||
xsel
|
python-psutil
|
||||||
gerbera
|
python-schedule
|
||||||
ibus
|
xsel
|
||||||
dconf
|
;; ajatt
|
||||||
gimp
|
suckless-dictpopup
|
||||||
blender
|
goldendict-ng
|
||||||
gimp-resynthesizer
|
foliate
|
||||||
wmctrl
|
impd
|
||||||
imagemagick
|
sylpheed
|
||||||
zpaq
|
sselp
|
||||||
libwebp
|
navidrome-bin
|
||||||
libreoffice
|
;;
|
||||||
librewolf
|
kitty
|
||||||
;; audio
|
element-desktop
|
||||||
ardour
|
lm-sensors
|
||||||
noise-repellent
|
;;emulators
|
||||||
;;
|
mupen64plus-ui-console
|
||||||
;; nextcloud-client
|
mupen64plus-input-sdl
|
||||||
xprop
|
mupen64plus-audio-sdl
|
||||||
fzf
|
mupen64plus-core
|
||||||
zstd
|
mupen64plus-video-glide64
|
||||||
aria2
|
dolphin-emu
|
||||||
;; wakatime
|
;;--------------------
|
||||||
wakapi-bin
|
gerbera
|
||||||
|
ibus
|
||||||
|
ueberzug++
|
||||||
|
dconf
|
||||||
|
gimp
|
||||||
|
sioyek
|
||||||
|
nextcloud-client
|
||||||
|
blender
|
||||||
|
gimp-resynthesizer
|
||||||
|
wmctrl
|
||||||
|
imagemagick
|
||||||
|
zpaq
|
||||||
|
libwebp
|
||||||
|
libreoffice
|
||||||
|
librewolf
|
||||||
|
;; audio
|
||||||
|
ardour
|
||||||
|
noise-repellent
|
||||||
|
;;
|
||||||
|
;; nextcloud-client
|
||||||
|
xset
|
||||||
|
xprop
|
||||||
|
fzf
|
||||||
|
zstd
|
||||||
|
aria2
|
||||||
|
;; wakatime
|
||||||
|
wakapi-bin
|
||||||
wakatime-cli-bin
|
wakatime-cli-bin
|
||||||
emacs-wakatime-mode
|
emacs-wakatime-mode
|
||||||
;;
|
;;
|
||||||
xrdb
|
xrdb
|
||||||
noisetorch
|
noisetorch
|
||||||
mpv
|
mpv
|
||||||
qtwebengine ;; required by some applications, like anki
|
;;emasc-everywhere
|
||||||
;;emasc-everywhere
|
xdotool
|
||||||
xdotool
|
xprop
|
||||||
xprop
|
xclip
|
||||||
xclip
|
xwininfo
|
||||||
xwininfo
|
;;
|
||||||
;;
|
xdg-user-dirs
|
||||||
xdg-user-dirs
|
xdg-desktop-portal-gtk
|
||||||
xdg-desktop-portal-gtk
|
xdg-desktop-portal
|
||||||
xdg-desktop-portal
|
tmux
|
||||||
tmux
|
pinentry
|
||||||
polybar
|
polybar
|
||||||
gnupg
|
gnupg
|
||||||
sdcv
|
sdcv
|
||||||
alacritty
|
alacritty
|
||||||
font-dejavu
|
font-dejavu
|
||||||
;;------
|
;;------
|
||||||
higan
|
higan
|
||||||
maim
|
maim
|
||||||
p7zip
|
p7zip
|
||||||
htop
|
htop
|
||||||
scrot
|
scrot
|
||||||
flameshot
|
flameshot
|
||||||
neofetch
|
neofetch
|
||||||
pfetch
|
pfetch
|
||||||
openjdk
|
openjdk
|
||||||
;;element-desktop
|
;;element-desktop
|
||||||
;; bluetooth
|
;; bluetooth
|
||||||
bluez
|
bluez
|
||||||
bluez-alsa
|
bluez-alsa
|
||||||
blueman
|
blueman
|
||||||
;; ime
|
;; ime
|
||||||
enchant
|
enchant
|
||||||
hunspell
|
hunspell
|
||||||
fcitx5
|
fcitx5
|
||||||
fcitx5-gtk
|
fcitx5-gtk
|
||||||
fcitx5-qt
|
fcitx5-qt
|
||||||
fcitx5-anthy
|
fcitx5-anthy
|
||||||
fcitx5-gtk4
|
fcitx5-gtk4
|
||||||
fcitx5-configtool
|
fcitx5-configtool
|
||||||
;;
|
;;
|
||||||
icecat
|
icecat
|
||||||
ffmpeg
|
ffmpeg
|
||||||
nsxiv
|
nsxiv
|
||||||
pinentry
|
pinentry
|
||||||
git
|
git
|
||||||
pavucontrol-qt
|
pavucontrol-qt
|
||||||
emacs
|
emacs
|
||||||
emacs-bluetooth
|
emacs-bluetooth
|
||||||
xrandr
|
xrandr
|
||||||
qbittorrent
|
qbittorrent
|
||||||
emacs-rainbow-delimiters
|
emacs-rainbow-delimiters
|
||||||
emacs-olivetti
|
emacs-olivetti
|
||||||
emacs-telega
|
emacs-haskell-mode
|
||||||
emacs-sly
|
emacs-ligature
|
||||||
emacs-ccls
|
emacs-sly
|
||||||
emacs-lsp-mode
|
emacs-org-roam
|
||||||
emacs-lsp-ui
|
emacs-ccls
|
||||||
emacs-rmsbolt
|
emacs-lsp-mode
|
||||||
sbcl
|
emacs-lsp-ui
|
||||||
emacs-nerd-icons
|
emacs-rmsbolt
|
||||||
emacs-esxml
|
font-iosevka-comfy
|
||||||
ripgrep
|
sbcl
|
||||||
gdb
|
emacs-nerd-icons
|
||||||
emacs-olivetti
|
emacs-esxml
|
||||||
emacs-deadgrep
|
ripgrep
|
||||||
emacs-realgud
|
gdb
|
||||||
emacs-rg
|
emacs-olivetti
|
||||||
emacs-dumb-jump
|
emacs-deadgrep
|
||||||
emacs-circe
|
emacs-realgud
|
||||||
zip
|
emacs-rg
|
||||||
thunar
|
emacs-dumb-jump
|
||||||
unzip
|
emacs-circe
|
||||||
;;emacs-nov-el
|
zip
|
||||||
|
thunar
|
||||||
|
unzip
|
||||||
|
;;emacs-nov-el
|
||||||
fontconfig
|
fontconfig
|
||||||
;; font-apple-color-emoji
|
;; font-apple-color-emoji
|
||||||
picom
|
picom
|
||||||
feh
|
feh
|
||||||
;; ================
|
;; ================
|
||||||
;; haskell
|
;; haskell
|
||||||
cabal-install
|
cabal-install
|
||||||
;; deps for xmonad
|
;; deps for xmonad
|
||||||
xmonad
|
xmonad
|
||||||
xmobar
|
xmobar
|
||||||
ghc ;; ridiculous, gcc and ghc are runtime dependencies , yet people didnt put in the package description
|
ghc ;; ridiculous, gcc and ghc are runtime dependencies , yet people didnt put in the package description
|
||||||
ghc-xmonad-contrib
|
ghc-xmonad-contrib
|
||||||
;; ==================
|
;; ==================
|
||||||
gcc
|
gcc
|
||||||
gcc-toolchain
|
gcc-toolchain
|
||||||
xmessage
|
xmessage
|
||||||
xmodmap
|
xmodmap
|
||||||
rofi
|
rofi
|
||||||
linux-libre-headers
|
linux-libre-headers
|
||||||
;;--------
|
;;--------
|
||||||
yt-dlp
|
yt-dlp
|
||||||
;; nicotine+
|
;; nicotine+
|
||||||
linux-firmware
|
linux-firmware
|
||||||
(specification->package "jami")
|
(specification->package "jami")
|
||||||
)
|
)
|
||||||
%base-packages))
|
%base-packages))
|
||||||
|
|
||||||
;;(home-environment (packages (cons* anki ))) ;; figure out how to install it from here
|
;;(home-environment (packages (cons* anki ))) ;; figure out how to install it from here
|
||||||
|
|
@ -312,47 +360,58 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
|
||||||
(services
|
(services
|
||||||
|
|
||||||
(append (list (simple-service 'my-zfs-loader
|
(append (list (simple-service 'my-zfs-loader
|
||||||
kernel-module-loader-service-type
|
kernel-module-loader-service-type
|
||||||
'("zfs"))
|
'("zfs"))
|
||||||
(simple-service 'my-jp-ime-env session-environment-service-type
|
(simple-service 'my-jp-ime-env session-environment-service-type
|
||||||
'(("GTK_IM_MODULE" . "fcitx")
|
'(("GTK_IM_MODULE" . "fcitx")
|
||||||
("QT_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_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")
|
("GUIX_GTK3_IM_MODULE_FILE" . "/run/current-system/profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache")
|
||||||
("XMODIFIERS=@im=" . "fcitx")
|
("XMODIFIERS=@im=" . "fcitx")
|
||||||
("INPUT_METHOD" . "fcitx")
|
("INPUT_METHOD" . "fcitx")
|
||||||
("XIM_PROGRAM" . "fcitx")
|
("XIM_PROGRAM" . "fcitx")
|
||||||
("GLFW_IM_MODULE" . "ibus")))
|
("GLFW_IM_MODULE" . "ibus")
|
||||||
(service zram-device-service-type
|
;; this makes qt programs looks sharper
|
||||||
(zram-device-configuration
|
("QML_DISABLE_DISTANCEFIELD" . "1")
|
||||||
(size "6G")
|
("QT_QUICK_CONTROLS_STYLE" . "Fusion")
|
||||||
(compression-algorithm 'xz)
|
("QT_ENABLE_HIGHDPI_SCALING" . "0")
|
||||||
(priority 100)))
|
("R600_TEX_ANISO" . "16")
|
||||||
;; (service oci-forgejo-service-type)
|
))
|
||||||
(set-xorg-configuration
|
|
||||||
(xorg-configuration
|
|
||||||
|
|
||||||
(keyboard-layout keyboard-layout)))
|
(service zram-device-service-type
|
||||||
(udev-rules-service '8bitdo %8bitdo-udev-rules)
|
(zram-device-configuration
|
||||||
|
(size "6G")
|
||||||
|
(compression-algorithm 'xz)
|
||||||
|
(priority 100)))
|
||||||
|
;; (service oci-forgejo-service-type)
|
||||||
|
(set-xorg-configuration
|
||||||
|
(xorg-configuration
|
||||||
|
|
||||||
(service nix-service-type)
|
(keyboard-layout keyboard-layout)))
|
||||||
|
(udev-rules-service '8bitdo %8bitdo-udev-rules)
|
||||||
|
|
||||||
;; bluetooth
|
(service nix-service-type)
|
||||||
(service bluetooth-service-type
|
|
||||||
(bluetooth-configuration
|
|
||||||
(auto-enable? #t)))
|
|
||||||
|
|
||||||
(simple-service 'blueman dbus-root-service-type (list blueman))
|
;; bluetooth
|
||||||
|
(service bluetooth-service-type
|
||||||
|
(bluetooth-configuration
|
||||||
|
(auto-enable? #t)))
|
||||||
|
|
||||||
#| Compress my mpv screenshots periodically |#
|
(simple-service 'blueman dbus-root-service-type (list blueman))
|
||||||
(service mcron-service-type
|
|
||||||
(mcron-configuration
|
|
||||||
(jobs (list #~(job "10 15 * * *"
|
|
||||||
"find /mnt/Data/mpv-screenshots/ -type f \\( -iname '*.png' -o -iname '*.jpg' \\) -exec sh -c 'cwebp -q 80 \"$0\" -o \"${0%.*}.webp\" && rm \"$0\"' {} \\;")))))
|
|
||||||
|
|
||||||
)
|
(service opendoas-service-type
|
||||||
|
(opendoas-configuration
|
||||||
|
(rules (append general))))
|
||||||
|
|
||||||
%desktop-services)
|
#| Compress my mpv screenshots periodically |#
|
||||||
|
(service mcron-service-type
|
||||||
|
(mcron-configuration
|
||||||
|
(jobs (list #~(job "10 15 * * *"
|
||||||
|
"find /mnt/Data/mpv-screenshots/ -type f \\( -iname '*.png' -o -iname '*.jpg' \\) -exec sh -c 'cwebp -q 80 \"$0\" -o \"${0%.*}.webp\" && rm \"$0\"' {} \\;")))))
|
||||||
|
|
||||||
|
)
|
||||||
|
|
||||||
|
%desktop-services)
|
||||||
|
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
@ -362,28 +421,32 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
|
||||||
(keyboard-layout keyboard-layout)))
|
(keyboard-layout keyboard-layout)))
|
||||||
(swap-devices (list (swap-space
|
(swap-devices (list (swap-space
|
||||||
(target (uuid
|
(target (uuid
|
||||||
"4f829a61-6f51-435b-bade-2991c094080f")))))
|
"4f829a61-6f51-435b-bade-2991c094080f")))))
|
||||||
|
|
||||||
|
;; Do not generate a sudoers file
|
||||||
|
(sudoers-file #f)
|
||||||
|
|
||||||
|
|
||||||
;; The list of file systems that get "mounted". The unique
|
;; The list of file systems that get "mounted". The unique
|
||||||
;; file system identifiers there ("UUIDs") can be obtained
|
;; file system identifiers there ("UUIDs") can be obtained
|
||||||
;; by running 'blkid' in a terminal.
|
;; by running 'blkid' in a terminal.
|
||||||
(file-systems (cons* (file-system
|
(file-systems (cons* (file-system
|
||||||
(mount-point "/boot/efi")
|
(mount-point "/boot/efi")
|
||||||
(device (uuid "7C90-0F50"
|
(device (uuid "7C90-0F50"
|
||||||
'fat32))
|
'fat32))
|
||||||
(type "vfat"))
|
(type "vfat"))
|
||||||
(file-system
|
(file-system
|
||||||
(mount-point "/")
|
(mount-point "/")
|
||||||
(device (uuid
|
(device (uuid
|
||||||
"ef8ef1c0-99bd-431a-abde-e2fc6421da60"
|
"ef8ef1c0-99bd-431a-abde-e2fc6421da60"
|
||||||
'ext4))
|
'ext4))
|
||||||
(type "ext4"))
|
(type "ext4"))
|
||||||
;; (file-system
|
;; (file-system
|
||||||
;; (mount-point "/mnt/Reading")
|
;; (mount-point "/mnt/Reading")
|
||||||
;; (device (uuid
|
;; (device (uuid
|
||||||
;; "223baecf-e5f4-453f-90c7-d33edbbae145"
|
;; "223baecf-e5f4-453f-90c7-d33edbbae145"
|
||||||
;; 'ext4))
|
;; 'ext4))
|
||||||
;; (type "ext4"))
|
;; (type "ext4"))
|
||||||
|
|
||||||
|
|
||||||
%base-file-systems)))
|
%base-file-systems)))
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue