zhu

guix/.config/guix/config-anaconda.scm

@@ -0,0 +1,90 @@
+;; This is an operating system configuration generated
+;; by the graphical installer.
+;;
+;; Once installation is complete, you can learn and modify
+;; this file to tweak the system configuration, and pass it
+;; to the 'guix system reconfigure' command to effect your
+;; changes.
+
+
+;; Indicate which modules to import to access the variables
+;; used in this configuration.
+(define-module (config-anaconda)
+  #:use-module (gnu)
+  #:use-module (gnu packages wm)
+  #:use-module (gnu packages gnome)
+)
+(use-service-modules cups desktop networking ssh xorg pm)
+
+(operating-system
+  (locale "ru_RU.utf8")
+  (timezone "Europe/Berlin")
+  (keyboard-layout (keyboard-layout "eu,ru"
+                                    #:options '("grp:alt_shift_toggle")))
+  (host-name "anaconda")
+
+  ;; Учетные записи пользователей ('root' не указывается).
+  (users (cons* (user-account
+                  (name "kylekrein")
+                  (comment "Kylekrein")
+                  (group "users")
+                  (home-directory "/home/kylekrein")
+                  (supplementary-groups '("wheel" "netdev" "audio" "video")))
+                %base-user-accounts))
+
+  ;; Packages installed system-wide.  Users can also install packages
+  ;; under their own account: use 'guix search KEYWORD' to search
+  ;; for packages and 'guix install PACKAGE' to install a package.
+  (packages (append (list (specification->package "emacs-pgtk")
+                          (specification->package "niri")
+			  (specification->package "git")
+			  (specification->package "alacritty")
+                          (specification->package
+                           "dbus")) %base-packages))
+
+  ;; Below is the list of system services.  To search for available
+  ;; services, run 'guix system search KEYWORD' in a terminal.
+  (services
+   (append (list
+
+                 ;; To configure OpenSSH, pass an 'openssh-configuration'
+                 ;; record as a second argument to 'service' below.
+                 (service openssh-service-type)
+                 (service cups-service-type)
+		 (service power-profiles-daemon-service-type)
+		 (service powertop-service-type)
+                 (set-xorg-configuration
+                  (xorg-configuration (keyboard-layout keyboard-layout))))
+
+           ;; This is the default list of services we
+           ;; are appending to.
+           (modify-services %desktop-services
+             (console-font-service-type config =>
+                                        (map (lambda (tty)
+                                               (cons (car tty)
+                                                     "LatGrkCyr-8x16"))
+                                             config)))))
+  (bootloader (bootloader-configuration
+                (bootloader grub-efi-bootloader)
+                (targets (list "/boot/efi"))
+                (keyboard-layout keyboard-layout)))
+  (mapped-devices (list (mapped-device
+                          (source (uuid
+                                   "e54aaf39-5cc4-42c0-9ca8-f7071087643c"))
+                          (target "cryptroot")
+                          (type luks-device-mapping))))
+
+  ;; The list of file systems that get "mounted".  The unique
+  ;; file system identifiers there ("UUIDs") can be obtained
+  ;; by running 'blkid' in a terminal.
+  (file-systems (cons* (file-system
+                         (mount-point "/")
+                         (device "/dev/mapper/cryptroot")
+                         (type "btrfs")
+                         (dependencies mapped-devices))
+                       (file-system
+                         (mount-point "/boot/efi")
+                         (device (uuid "A753-E712"
+                                       'fat32))
+                         (type "vfat")) %base-file-systems)))
+

guix/.config/guix/home-anaconda.scm

@@ -0,0 +1,111 @@
+(define-module (guix-home-config)
+  #:use-module (gnu home)
+  #:use-module (gnu home services)
+  #:use-module (gnu home services shells)
+  #:use-module (gnu services)
+  #:use-module (gnu system shadow)
+  #:use-module (gnu packages librewolf)
+  #:use-module (gnu packages password-utils)
+  #:use-module (gnu packages image)
+  #:use-module (gnu packages emacs)
+  #:use-module (gnu packages terminals)
+  #:use-module (gnu packages freedesktop)
+  #:use-module (gnu packages wm)
+  #:use-module (gnu packages audio)
+  #:use-module (gnu packages xdisorg)
+  #:use-module (gnu packages xorg)
+  #:use-module (gnu packages monitoring)
+  #:use-module (gnu packages kde-utils)
+  #:use-module (gnu packages kde-internet)
+  #:use-module (gnu packages version-control)
+  #:use-module (gnu packages golang)
+  #:use-module (gnu packages rust-apps)
+  #:use-module (gnu packages qt)
+  #:use-module (gnu packages glib)
+  #:use-module (gnu packages linux)
+  #:use-module (gnu packages gnome)
+  #:use-module (gnu packages fonts)
+  #:use-module (gnu packages kde-plasma)
+  #:use-module (gnu packages emacs-xyz)
+  #:use-module (gnu packages package-management)
+  #:use-module (gnu packages kde-systemtools)
+  #:use-module (gnu home services sound)
+  #:use-module (gnu home services desktop)
+  #:use-module (gnu packages sync)
+  #:use-module (gnu packages gtk)
+  #:use-module (gnu packages admin)
+  #:use-module (gnu packages pulseaudio)
+)
+
+(define home-config
+  (home-environment
+    (services
+      (append
+        (list
+          ;; Uncomment the shell you wish to use for your user:
+          (service home-bash-service-type
+		   (home-bash-configuration
+		    (environment-variables 
+		     `(("PATH" . "$PATH:$HOME/bin")))))
+          (service home-pipewire-service-type)
+          (service home-dbus-service-type)
+          ;(service home-fish-service-type)
+          ;(service home-zsh-service-type)
+	  (simple-service 'home-packages home-profile-service-type
+		(list
+;main apps
+btop
+dolphin
+librewolf
+emacs-pgtk
+alacritty
+git
+ark
+cliphist
+quickshell
+nextcloud-client
+stow
+pavucontrol
+nautilus
+neochat
+ripgrep
+;additional apps and dependencies
+xdg-desktop-portal-gtk
+xwayland-satellite
+gtk
+hicolor-icon-theme
+breeze
+font-adwaita
+xdg-desktop-portal-gnome
+adwaita-icon-theme
+qtwayland
+cava
+cliphist
+wl-clipboard
+dgop
+accountsservice
+matugen
+`(,glib "bin")
+brightnessctl
+qtmultimedia
+fastfetch
+grim
+slurp
+swappy
+secretsd
+;; Emacs
+emacs-guix
+emacs-vterm
+))
+
+          (service home-files-service-type
+           `((".guile" ,%default-dotguile)
+             (".Xdefaults" ,%default-xdefaults)))
+
+          (service home-xdg-configuration-files-service-type
+           `(("gdb/gdbinit" ,%default-gdbinit)
+             ("nano/nanorc" ,%default-nanorc))))
+
+        %base-home-services))))
+
+home-config

guix/.config/guix/home-fleetcarrier.scm

@@ -7,6 +7,8 @@
   #:use-module (gnu services)
   #:use-module (gnu system shadow)
   #:use-module (gnu packages librewolf)
+  #:use-module (gnu packages password-utils)
+  #:use-module (gnu packages image)
   #:use-module (gnu packages emacs)
   #:use-module (gnu packages terminals)
   #:use-module (gnu packages freedesktop)
@@ -16,6 +18,7 @@
   #:use-module (gnu packages xorg)
   #:use-module (gnu packages monitoring)
   #:use-module (gnu packages kde-utils)
+  #:use-module (gnu packages kde-internet)
   #:use-module (gnu packages version-control)
   #:use-module (gnu packages golang)
   #:use-module (gnu packages rust-apps)
@@ -25,6 +28,7 @@
   #:use-module (gnu packages gnome)
   #:use-module (gnu packages fonts)
   #:use-module (gnu packages kde-plasma)
+  #:use-module (gnu packages emacs-xyz)
   #:use-module (gnu packages package-management)
   #:use-module (gnu packages kde-systemtools)
   #:use-module (gnu home services sound)
@@ -43,7 +47,10 @@
       (append
         (list
           ;; Uncomment the shell you wish to use for your user:
-          (service home-bash-service-type)
+          (service home-bash-service-type
+		   (home-bash-configuration
+		    (environment-variables 
+		     `(("PATH" . "$PATH:$HOME/bin")))))
           (service home-pipewire-service-type)
           (service home-dbus-service-type)
           ;(service home-fish-service-type)
@@ -66,6 +73,8 @@ solaar
 stow
 pavucontrol
 nautilus
+neochat
+ripgrep
 ;additional apps and dependencies
 xdg-desktop-portal-gtk
 xwayland-satellite
@@ -86,6 +95,14 @@ matugen
 `(,glib "bin")
 brightnessctl
 qtmultimedia
+fastfetch
+grim
+slurp
+swappy
+secretsd
+;; Emacs
+emacs-guix
+emacs-vterm
 )))
 
           (service home-files-service-type

niri/.config/niri/config.kdl

@@ -281,8 +281,7 @@ layout {
 // which may be more convenient to use.
 // See the binds section below for more spawn examples.
 
-spawn-sh-at-startup "/usr/bin/pipewire-launcher.sh"
+spawn-sh-at-startup "mkdir -p $HOME/.local/share/nullroute.lt/secretsd && secretsd"
-spawn-sh-at-startup "gnome-keyring-daemon"
 spawn-sh-at-startup "alacritty --daemon"
 spawn-sh-at-startup "emacs --daemon"
 spawn-sh-at-startup "qs"
@@ -293,7 +292,6 @@ spawn-sh-at-startup "wvkbd --hidden || notify-send 'wvkbd crashed'"
 spawn-sh-at-startup "lisgd"
 spawn-sh-at-startup "autorotate.sh"
 spawn-sh-at-startup "start-searxng.sh"
-spawn-sh-at-startup "/usr/libexec/hyprpolkitagent"
 spawn-sh-at-startup "hypridle"
 
 config-notification {
@@ -656,4 +654,7 @@ recent-windows {
 
 cursor {
        hide-after-inactive-ms 10000
+}
+
+environment {
 }

niri/bin/screenshot-annotate.sh

@@ -1,2 +1,2 @@
 #!/usr/bin/env bash
-grim -g "$(slurp -w 0)" -t ppm - | satty --early-exit --copy-command 'wl-copy' --filename='-' -o '~/Pictures/Screenshots/Screenshot-%Y-%m-%d_%H:%M:%S.png' --initial-tool brush
+grim -g "$(slurp -w 0)" - | swappy -f -

quickshell/.config/quickshell/Modules/TopBar/ControlCenterButton.qml

@@ -63,14 +63,6 @@ Rectangle {
             anchors.verticalCenter: parent.verticalCenter
             visible: root.showNetworkIcon
 
-            RotationAnimation on rotation {
-                running: NetworkService.wifiToggling
-                loops: Animation.Infinite
-                from: 0
-                to: 360
-                duration: 1000
-            }
-
         }
 
         DankIcon {