From ded4df66321b8d7c3fa1a0a9a8bc231656444a1b Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sat, 14 Mar 2020 13:14:29 +0000 Subject: Move and improve the "starting the server" message Move it after the output relating to narinfo signing, and include the host. --- scripts/guix-data-service.in | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'scripts') diff --git a/scripts/guix-data-service.in b/scripts/guix-data-service.in index b1946a5..a09a204 100644 --- a/scripts/guix-data-service.in +++ b/scripts/guix-data-service.in @@ -147,9 +147,6 @@ (lambda (port) (simple-format port "~A\n" (getpid)))))) - (simple-format #t "starting the server on port ~A\n" - (assq-ref opts 'port)) - (parameterize ((%narinfo-signing-public-key (catch 'system-error @@ -184,6 +181,12 @@ (%show-error-details (assoc-ref opts 'show-error-details))) + ;; Provide some visual space between the startup output and the server + ;; starting + (simple-format #t "\n\nStarting the server on http://~A:~A/\n\n" + (assq-ref opts 'host) + (assq-ref opts 'port)) + (start-guix-data-service-web-server (assq-ref opts 'port) (assq-ref opts 'host) (assq-ref opts 'secret-key-base)))) -- cgit v1.2.3