remote: Set the locale only in the publish thread.

* src/cuirass/remote-server.scm (remote-server): Move the locale setup to the
publish thread.
* src/cuirass/remote-worker.scm (remote-worker): Ditto.
* src/cuirass/remote.scm (publish-server): Set the locale.

src/cuirass/remote-server.scm

@@ -426,9 +426,6 @@ exiting."
   (setvbuf (current-output-port) 'line)
   (setvbuf (current-error-port) 'line)
 
-  ;; Use a default locale.
-  (setlocale LC_ALL "en_US.utf8")
-
   (with-error-handling
     (let* ((opts (args-fold* args %options
                              (lambda (opt name arg result)

src/cuirass/remote-worker.scm

@@ -350,9 +350,6 @@ exiting."
   (setvbuf (current-output-port) 'line)
   (setvbuf (current-error-port) 'line)
 
-  ;; Use a default locale.
-  (setlocale LC_ALL "en_US.utf8")
-
   (with-error-handling
     (let* ((opts (args-fold* args %options
                              (lambda (opt name arg result)

src/cuirass/remote.scm

@@ -261,6 +261,10 @@ PRIVATE-KEY to sign narinfos."
            (dup2 (fileno log-file) 1)
            (dup2 (fileno log-file) 2)
            (close-port log-file)
+
+           ;; Use a default locale.
+           (setlocale LC_ALL "en_US.utf8")
+
            (let* ((address (make-socket-address AF_INET INADDR_ANY 0))
                   (socket-address
                    (make-socket-address (sockaddr:fam address)