From b714fc11ef15e7bf8bf4365ccb8b15aeb0ae358c Mon Sep 17 00:00:00 2001
From: bartronx7 <bart@akeley.dev>
Date: Tue, 19 Aug 2025 08:03:37 -0500
Subject: [PATCH] add bluetooth service - update bart default shell to zsh -
 move channels to codeberg

---
 .gitignore   | 2 ++
 channels.scm | 2 +-
 system.scm   | 9 ++++++++-
 3 files changed, 11 insertions(+), 2 deletions(-)
 create mode 100644 .gitignore

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..ac81f5c
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,2 @@
+*.bak
+current
diff --git a/channels.scm b/channels.scm
index ba8dca7..aa43417 100644
--- a/channels.scm
+++ b/channels.scm
@@ -9,7 +9,7 @@
               "2A39 3FFF 68F4 EF7A 3D29  12AF 6F51 20A0 22FB B2D5"))))
       (channel
         (name 'guix)
-        (url "https://git.savannah.gnu.org/git/guix.git")
+        (url "https://codeberg.org/guix/guix.git")
         (branch "master")
         (introduction
           (make-channel-introduction
diff --git a/system.scm b/system.scm
index 889e84e..f76404d 100644
--- a/system.scm
+++ b/system.scm
@@ -11,6 +11,7 @@
 ;; used in this configuration.
 (use-modules (gnu) (nongnu packages linux))
 (use-service-modules cups desktop networking ssh xorg)
+(use-package-modules shells)
 
 (operating-system
   (kernel linux)
@@ -28,6 +29,7 @@
                   (comment "Bart")
                   (group "users")
                   (home-directory "/home/bartronx7")
+                  (shell #~(string-append #$zsh "/bin/zsh"))
                   (supplementary-groups '("wheel" "netdev" "audio" "video")))
                 (user-account
                   (name "kate")
@@ -46,7 +48,8 @@
                           (specification->package "st")
                           (specification->package "firefox")
                           (specification->package "libreoffice")
-                          (specification->package "git") %base-packages))
+                          (specification->package "git")
+                          (specification->package "zsh")) %base-packages))
 
   ;; Below is the list of system services.  To search for available
   ;; services, run 'guix system search KEYWORD' in a terminal.
@@ -55,6 +58,10 @@
 
                  ;; To configure OpenSSH, pass an 'openssh-configuration'
                  ;; record as a second argument to 'service' below.
+                 (service bluetooth-service-type 
+                   (bluetooth-configuration
+                     (fast-connectable? #t)
+                     (auto-enable? #t)))
                  (service openssh-service-type)
                  (service tor-service-type)
                  (service cups-service-type