Re: Set up the bluetooth - error : dbus-service-type: unbound variable

[hub . lombard]

Hi Guix!
I have now bluetooth enabled, many thanks to Mario Forzanini (he forgot to add 
the mailing list in Cc :)

<snip>
 (use-modules (gnu services base)
                (gnu services desktop))

 (operating-system
     ; ...
     (services
         (cons
          (service bluetooth-service-type
                   (bluetooth-configuration
                    (auto-enable? #t)))
          %desktop-services)))
<snap>

Good afternoon guix!


Hubert

----- Mail original -----
De: "hub lombard" <hub.lombard@free.fr>
À: "help-guix" <help-guix@gnu.org>
Envoyé: Jeudi 16 Mars 2023 21:20:37
Objet: Set up the bluetooth - error : dbus-service-type: unbound variable

Hello Guix!

Wanting to use bluetooth devices, especially audio speakers, I have tried to
inser in my /etc/config.scm some relevant gnu packages, modules, services...
But I can't make it work
My config:
--8<---------------cut here---------------start------------->8---

(use-modules (gnu) (gnu services vpn)(gnu packages gnome)(gnu packages 
certs)(gnu packages screen)(gnu packages ssh) (gnu packages linux) (gnu 
packages audio)) 
;; (gnu packages dbus))   ;after a reconfigure, I get: "no code for module (gnu 
packages dbus)"
(use-service-modules desktop networking ssh xorg virtualization audio dbus 
sound)
(use-package-modules glib scanner audio linux)  ;'dbus' added here for a while, 
give something like: " conseil: try glib (instead of dbus)"
;; 

(operating-system
  (host-name "gnu")
  (timezone "Europe/Paris")
  (locale "fr_FR.utf8")
  
  (keyboard-layout (keyboard-layout "fr"))
  
  (users (cons* (user-account
                  (name "hubert")
                  (comment "Hubert")
                  (group "users")
                  (home-directory "/home/hubert")
                  (supplementary-groups
                    '("wheel" "netdev" "audio" "video" "kvm" "lp")));I have 
added "lp"
                %base-user-accounts))
;;  (packages
;;    (append
;;      (list (specification->package "nss-certs"))
;;      %base-packages))

;; This is where we specify
;; system-wide packages.
(packages (cons* gvfs                 
                 nss-certs            
                 screen
                 openssh
                 bluez                ;for bluetooth
                 bluez-alsa           ;sound
                %base-packages))

  (services
    (append
      (list (service gnome-desktop-service-type)
            (service xfce-desktop-service-type)
            (service alsa-service-type) ;And these three lines about alsa,  
            (dbus-service-type #:services (list bluez-alsa));dbus and
            (bluetooth-service-type #:auto-enable? #t);bluetooth
            (set-xorg-configuration
              (xorg-configuration
                (keyboard-layout keyboard-layout))))
;;             (service hurd-vm-service-type
;;         (hurd-vm-configuration
;;          (disk-size (* 12 (expt 2 30))) 
;;          (memory-size 1024)))              
               %desktop-services))
   (bootloader
    (bootloader-configuration
      (bootloader grub-bootloader)
      (targets "/dev/sda")
      (keyboard-layout keyboard-layout)))
  (swap-devices
    (list (uuid "cf5ad08e-1a92-4a2e-a059-b2a71f4da6ea")))
  (file-systems
    (cons* (file-system
             (mount-point "/")
             (device
               (uuid "eabe9803-3544-4e44-b44f-965aa76e7b96"
                     'ext4))
             (type "ext4"))
           %base-file-systems)) 
)
--8<---------------cut here---------------end--------------->8---

$ sudo guix system reconfigure /etc/config.scm
..............................................
ice-9/boot-9.scm:1685:16: In procedure raise-exception:
erreur : dbus-service-type : variable non liée 


After have put '(gnu packages dbus)'


$ sudo guix system reconfigure /etc/config.scm
..............................................
guix system: erreur : échec lors du chargement de « /etc/config.scm » :
ice-9/boot-9.scm:3330:6: In procedure resolve-interface:
no code for module (gnu packages dbus)

I don't know how to investigate more...
Thank you in advance if you have some infos :)

Regards


Hubert