bartronx7 home config, pipewire, and librewolf

x1carbon/home.scm

@@ -0,0 +1,54 @@
+;; This "home-environment" file can be passed to 'guix home reconfigure'
+;; to reproduce the content of your profile.  This is "symbolic": it only
+;; specifies package names.  To reproduce the exact same profile, you also
+;; need to capture the channels being used, as returned by "guix describe".
+;; See the "Replicating Guix" section in the manual.
+
+(use-modules (gnu home)
+             (gnu packages)
+             (gnu services)
+             (guix gexp)
+             (gnu home services shells)
+	     (gnu home services sound)
+	     (gnu home services desktop))
+
+;; (use-service-modules sound)
+
+(home-environment
+  ;; Below is the list of packages that will show up in your
+  ;; Home profile, under ~/.guix-home/profile.
+  (packages (specifications->packages (list "gnome-shell-extensions"
+                                       "wireplumber"
+                                       "pipewire"
+                                       "vlc"
+                                       "signal-desktop"
+                                       "binutils"
+                                       "elfutils"
+                                       "patchelf"
+                                       "file"
+                                       "gnome-weather"
+                                       "gnome-tweaks"
+                                       "gnome-shell-extension-just-perfection"
+                                       "gnome-shell-extension-vitals"
+                                       "gnome-shell-extension-weather-oclock"
+                                       "emacs-no-x"
+                                       "gsettings-desktop-schemas"
+                                       "python"
+                                       "starship")))
+
+  ;; Below is the list of Home services.  To search for available
+  ;; services, run 'guix home search KEYWORD' in a terminal.
+  (services
+   (append (list (service home-bash-service-type
+                          (home-bash-configuration
+                           (aliases '())
+                           (bashrc (list (local-file
+                                          "/home/bartronx7/src/guix-config/.bashrc"
+                                          "bashrc")))
+                           (bash-profile (list (local-file
+                                                "/home/bartronx7/src/guix-config/.bash_profile"
+                                                "bash_profile")))))
+                (service home-dbus-service-type)
+		(service home-pipewire-service-type (home-pipewire-configuration))
+                (service home-zsh-service-type (home-zsh-configuration)))
+           %base-home-services)))

x1carbon/system.scm

@@ -9,8 +9,8 @@
 
 ;; Indicate which modules to import to access the variables
 ;; used in this configuration.
-(use-modules (gnu) (nongnu packages linux))
+(use-modules (gnu home services sound) (nongnu packages linux))
-(use-service-modules cups desktop networking ssh xorg)
+(use-service-modules cups desktop networking ssh xorg sound)
 (use-package-modules shells)
 
 (operating-system
@@ -21,8 +21,6 @@
   (keyboard-layout (keyboard-layout "us"))
   (host-name "x1carbon")
 
-  (swap-devices (list (swap-space (target "/swapfile"))))
-
   ;; The list of user accounts ('root' is implicit).
   (users
     (cons*
@@ -59,15 +57,21 @@
   (packages
     (append
       (map specification->package (list
-        "dmenu"
-        "st"
-        "firefox"
-        "libreoffice"
-        "git"
 	"curl"
+	"dmenu"
+        "firefox"
+        "git"
+        "gnome-shell-extensions"
+        "gnome-shell-extensions-weather-oclock"
+        "gnome-shell-extensions-vitals"
+        "libreoffice"
+        "pipewire"
         "rust"
-        "zsh"
+        "st"
-        "unzip"))
+        "unzip"
+        "vlc"
+        "wireplumber"
+        "zsh"))
       %base-packages))
 
   ;; Below is the list of system services.  To search for available
@@ -77,6 +81,8 @@
      %desktop-services
      (list
        	(service gnome-desktop-service-type)
+       	(service home-pipewire-service-type)
+       	(service home-wireplumber-service-type)
 	(service bluetooth-service-type
 	  (bluetooth-configuration
 	    (fast-connectable? #t)
@@ -101,6 +107,9 @@
         (target "home")
         (type luks-device-mapping))))
         
+  (swap-devices (list
+     (swap-space (target (uuid "3d8108a1-31f6-4578-ac55-61d036de767d")))))
+
   ;; The list of file systems that get "mounted".  The unique
   ;; file system identifiers there ("UUIDs") can be obtained
   ;; by running 'blkid' in a terminal.