From 82cdee10870cfcfdb0f66b811e0b67f35cf9aecb Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Mon, 21 Nov 2022 23:55:00 +0100
Subject: Install more useful packages

---
 home-configuration.scm | 34 +++++++++++++++++++++++-----------
 1 file changed, 23 insertions(+), 11 deletions(-)

(limited to 'home-configuration.scm')

diff --git a/home-configuration.scm b/home-configuration.scm
index dcd2c561..271bcf93 100644
--- a/home-configuration.scm
+++ b/home-configuration.scm
@@ -99,17 +99,13 @@ replacement spec (to which `regexp-substitute/global' is applied)."
 (define gui-packages
   '(;; i3 and Xorg. i3 itself must be installed system-wide for gdm to pick it up.
     ;; acpilight is a drop-in xbacklight replacement, as xbacklight doesn't work on my system.
-    "acpilight" "arandr" "blueman" "dunst" "gnupg" "gimp" "hsetroot"
-    "inkscape" "icecat" "mpv" "nheko" "neomutt" "password-store"
-    "polybar" "rofi" "rofi-calc" "signal-desktop" "simple-scan"
+    "acpilight" "arandr" "blueman" "curl" "dunst" "gnupg" "gimp" "hsetroot"
+    "inkscape" "icecat" "kdeconnect" "mpv" "nheko" "neomutt" "password-store"
+    "pass-otp" "polybar" "rofi" "rofi-calc" "signal-desktop" "simple-scan"
     "xdg-utils" "xdot" "xclip" "xdotool" "xdpyinfo" "xev" "xfd" "xfontsel"
     "xinput" "xkill" "xprop" "xrandr" "xrdb" "xsel" "xset" "xwininfo"
-    "zoom" "zathura" "zathura-ps" "zathura-pdf-poppler"
-    ;; kitty uses startup-notifications, but doesn't pull it.
-    ;; TODO: kitty still doesn't find libstartup-notification-1.so,
-    ;; even though it's installed by this package. Maybe kitty needs
-    ;; its rpath adjusted?
-    "startup-notification"
+    "zoom" "zathura" "zathura-ps" "zathura-pdf-poppler" "zeal"
+    "dconf" "dconf-editor"  ; required for config by blueman, cozy, ...
     ;; "gnome-keyring"  ; installed system-wide; see system-configuration.scm
     ;; "geoclue"  ; for redshift -- installed system-wide
     ;; Fonts
@@ -164,9 +160,18 @@ replacement spec (to which `regexp-substitute/global' is applied)."
      (shepherd-service
       (documentation "KDE connect applet.")
       (provision '(kdeconnect-applet))
+      (requirement '(kdeconnectd))
       (start #~(make-forkexec-constructor
                 (list #$(package-binary "kdeconnect" "kdeconnect-indicator"))))
       (stop #~(make-kill-destructor)))
+     (shepherd-service
+      (documentation "KDE connect daemon.")
+      (provision '(kdeconnectd))
+      (start #~(make-forkexec-constructor
+                (list #$(file-append (specification->package "kdeconnect")
+                                     (string-append "/libexec/kdeconnectd")))))
+      (stop #~(make-kill-destructor)))
+
      (shepherd-service
       (documentation "Blueman applet; provides a GUI for connection to bluetooth devices.")
       (provision '(blueman-applet))
@@ -183,6 +188,7 @@ replacement spec (to which `regexp-substitute/global' is applied)."
       (start #~(make-forkexec-constructor
                 (list #$(package-binary "dunst"))))
       (stop #~(make-kill-destructor)))
+
      (shepherd-service
       (documentation "Picom compositor; enables transparent windows in X.")
       (provision '(picom))
@@ -190,6 +196,7 @@ replacement spec (to which `regexp-substitute/global' is applied)."
                 (list #$(package-binary "picom") "--experimental-backends"
                       "--config" #$(local-file "picom.conf"))))
       (stop #~(make-kill-destructor)))
+
      (shepherd-service
       (documentation "Source Xresources on login.")
       (provision '(xrdb))
@@ -204,6 +211,7 @@ replacement spec (to which `regexp-substitute/global' is applied)."
       (provision '(xorg-setup))
       (one-shot? #t)
       (start #~(lambda _
+                 (invoke #$(package-binary "numlockx") "on")
                  ;; Turn off the monitors if there is no input for 10 minutes.
                  (invoke #$(package-binary "xset") "dpms" "600" "600" "600")
                  (invoke #$(package-binary "xrandr")
@@ -363,11 +371,14 @@ replacement spec (to which `regexp-substitute/global' is applied)."
     ,@(specifications->packages gui-packages)
     ,@(specifications->packages
        '(;; CLI tools
-         "adb" "dos2unix" "file" "fzf" "git" "graphviz" "hledger"
+         "adb" "beets" "dos2unix" "file" "fzf" "git" "graphviz" "hledger"
          "imagemagick" "jq" "lesspipe" "nvme-cli" "openssh" "powertop"
          "pulsemixer" "pv" "python" "rsync" "sbcl" "smartmontools"
          "source-highlight" "tk" "tmux" "tree" "xxd" "zip" "unzip"
 
+         ;; Work
+         "s3cmd" "python-alibuild"  ; "python-alidistlint"
+
          ;; Language servers
          "clang"  ; for clangd
          "python-lsp-server"
@@ -437,9 +448,10 @@ replacement spec (to which `regexp-substitute/global' is applied)."
          "shellcheck"
          ;; Shell
          "zsh" "zsh-autosuggestions" "zsh-syntax-highlighting" "zsh-autopair"
+         "zsh-completions"   ; my own package
          ;; Ranger can do code highlighting using python-pygments and
          ;; image previews in kitty using python-pillow.
-         "ranger" "python-pygments" "python-pillow"))))
+         "ranger" "python-pygments" "python-pillow" "mediainfo" "python-pdftotext"))))
 
  ;; To search for available home services, run 'guix home search KEYWORD'.
  (services
-- 
cgit v1.2.3