Update config.scm

config.scm

@@ -1,4 +1,4 @@
-; This is an operating system configuration generated
+					; This is an operating system configuration generated
 ;; by the graphical installer.
 ;;
 ;; Once installation is complete, you can learn and modify
@@ -12,10 +12,19 @@
 (use-modules
  (gnu)
  (guix packages)
+ (ajatt packages dictionaries) 
+ (ajatt packages suckless)
+ (ajatt packages readers) 
+ (ajatt packages audio)
  (rosenthal packages binaries)
  (rosenthal packages emacs-xyz)
+ (radix services admin)
+ (radix packages image-viewers)
+ (gnu packages disk)
  (guix transformations)
  (gnu packages python-xyz)
+ (gnu packages fonts)
+ (gnu packages pdf)
  (gnu packages audio)
  (gnu packages librewolf)
  (gnu packages sync)
@@ -35,6 +44,7 @@
  (rde features bluetooth)
  (gnu packages gcc)
  (gnu packages pulseaudio)
+ (gnu packages mail)
  (gnu packages enchant)
  (gnu packages hunspell)
  (gnu packages upnp)
@@ -95,6 +105,7 @@
  (guix inferior)
  (gnu packages networking)
  (nongnu packages compression)
+ (nongnu packages messaging)
  (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)
 
@@ -169,16 +188,41 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 			 ;;------
 			 cmus
 			 emacs-ox-hugo
+			 emacs-dirvish
+			 qt-creator
 			 sbcl-coleslaw
 			 numix-gtk-theme
 			 tor
 			 python-psutil
 			 python-schedule
 			 xsel
+                         ;; ajatt
+                         suckless-dictpopup
+                         goldendict-ng
+			 foliate
+			 impd
+			 sylpheed
+			 sselp
+			 navidrome-bin
+			 ;;
+			 kitty
+          		 element-desktop
+			 lm-sensors
+			 ;;emulators
+			 mupen64plus-ui-console
+			 mupen64plus-input-sdl
+			 mupen64plus-audio-sdl
+			 mupen64plus-core
+			 mupen64plus-video-glide64
+			 dolphin-emu
+			 ;;--------------------
 			 gerbera
 		         ibus
+			 ueberzug++	
 			 dconf
 			 gimp
+			 sioyek
+			 nextcloud-client
 			 blender
 			 gimp-resynthesizer
 			 wmctrl
@@ -192,6 +236,7 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 			 noise-repellent
 			 ;;
 			 ;; nextcloud-client
+			 xset
 			 xprop
 			 fzf
 			 zstd
@@ -204,7 +249,6 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 			 xrdb
 			 noisetorch
 			 mpv
-			qtwebengine ;; required by some applications, like anki
 			 ;;emasc-everywhere
 			 xdotool
 			 xprop
@@ -215,6 +259,7 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 			 xdg-desktop-portal-gtk
 			 xdg-desktop-portal
 			 tmux
+			 pinentry
 			 polybar
 			 gnupg
 			 sdcv
@@ -257,12 +302,15 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 			 qbittorrent
 		      	 emacs-rainbow-delimiters
 			 emacs-olivetti
-			emacs-telega
+			 emacs-haskell-mode
+			 emacs-ligature
 			 emacs-sly
+			 emacs-org-roam
 			 emacs-ccls
 			 emacs-lsp-mode
 			 emacs-lsp-ui
 			 emacs-rmsbolt
+			 font-iosevka-comfy
 			 sbcl
 			 emacs-nerd-icons
 			 emacs-esxml
@@ -322,7 +370,14 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 				   ("XMODIFIERS=@im=" . "fcitx")
 				   ("INPUT_METHOD" . "fcitx")
 				   ("XIM_PROGRAM" . "fcitx")
-				  ("GLFW_IM_MODULE" . "ibus")))
+				   ("GLFW_IM_MODULE" . "ibus")
+				   ;; this makes qt programs looks sharper
+		 		   ("QML_DISABLE_DISTANCEFIELD" . "1")
+				   ("QT_QUICK_CONTROLS_STYLE" . "Fusion")
+				   ("QT_ENABLE_HIGHDPI_SCALING" . "0")	
+				   ("R600_TEX_ANISO" . "16")		
+				   ))
+		 
 		 (service zram-device-service-type
 			  (zram-device-configuration
 			   (size "6G")
@@ -344,6 +399,10 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
 
 		 (simple-service 'blueman dbus-root-service-type (list blueman))
 
+		 (service opendoas-service-type
+			  (opendoas-configuration
+			  (rules (append general))))
+		 
 		 #| Compress my mpv screenshots periodically |#
 		 (service mcron-service-type
 			  (mcron-configuration
@@ -364,6 +423,10 @@ KERNEL==\"xpad\", SUBSYSTEM==\"drivers\", ACTION==\"add\", ATTR{new_id}=\"2dc8 3
                       (target (uuid
 			       "4f829a61-6f51-435b-bade-2991c094080f")))))
 
+;; Do not generate a sudoers file
+(sudoers-file #f)
+
+ 
  ;; The list of file systems that get "mounted".  The unique
  ;; file system identifiers there ("UUIDs") can be obtained
  ;; by running 'blkid' in a terminal.