[shepherd] 10/10: repl: Update calls to deprecated 'start'.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository shepherd.

commit b79b9a32068719f78e59cf1186e7832f8d70aefa
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Thu Apr 27 16:12:12 2023 +0200

    repl: Update calls to deprecated 'start'.
    
    This is a followup to 0fc51b65862f1386877340550c5c0309f9af13d9.
    
    * modules/shepherd/service/repl.scm (spawn-child-service): Call
    'start-service' instead of 'start'.
    * tests/services/repl.sh: Likewise.
---
 modules/shepherd/service/repl.scm | 2 +-
 tests/services/repl.sh            | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/modules/shepherd/service/repl.scm 
b/modules/shepherd/service/repl.scm
index 0779c57..d7bc65a 100644
--- a/modules/shepherd/service/repl.scm
+++ b/modules/shepherd/service/repl.scm
@@ -47,7 +47,7 @@ socket.  Use @var{id} to create the service name."
                               (close-port client)
                               #f))))
     (register-services (list child))
-    (start child)))
+    (start-service child)))
 
 (define* (run-repl-service socket)
   (let loop ((client-id 1))
diff --git a/tests/services/repl.sh b/tests/services/repl.sh
index 8409c4e..c0e37d7 100644
--- a/tests/services/repl.sh
+++ b/tests/services/repl.sh
@@ -102,7 +102,7 @@ guile -c '
     (quote (begin
              (use-modules (shepherd service) (shepherd service monitoring))
              (register-services (list (monitoring-service #:period 2)))
-             (start (quote monitoring)))))
+             (start-service (lookup-service (quote monitoring))))))
    sock)
   (display ",q\n" sock)
   (let loop ()