modules/rosenthal/services/desktop.scm

@@ -643,7 +643,9 @@ gtk-key-theme-name = ~a~%"
         gdm-service-type
         sddm-service-type))
 
-  (cons* (service bluetooth-service-type
+  (cons* (service network-online-service-type)
+
+         (service bluetooth-service-type
            (bluetooth-configuration
              (auto-enable? #t)))
 
@@ -716,6 +718,8 @@ gtk-key-theme-name = ~a~%"
              (auto-start? #f)
              (daemonize? #f)))
 
+         (service home-network-online-service-type)
+
          ;; NOTE: The environment variable set by ‘home-dbus-service-type’ will
          ;; prevent GNOME from starting when using above Shepherd configuration.
          ;; Replace ‘home-dbus-service-type’, expecting the session bus will be

modules/rosenthal/services/networking.scm

@@ -51,7 +51,6 @@
           (start
            #~(lambda _
                (let ((timeout #$(file-append coreutils-minimal "/bin/timeout"))
-                     (sleep #$(file-append coreutils-minimal "/bin/sleep"))
                      (sh #$(file-append bash-minimal "/bin/sh"))
                      (ping (if #$home-service?
                                "ping"
@@ -61,10 +60,9 @@
                            (format #f "\
   until ~a -qc1 -W1 example.org
   do
-      ~a 1
+      sleep 1
   done"
-                                   ping
-                                   sleep)))))))))
+                                   ping)))))))))
 
 (define network-online-service-type
   (service-type