GNU bug report logs - #36957
[PATCH] machine: Allow non-root users to deploy.

Previous Next

Full log

View this message in rfc822 format

From: Ricardo Wurmus <rekado <at> elephly.net>
To: "Jakob L. Kreuze" <zerodaysfordays <at> sdf.lonestar.org>
Cc: Christopher Lemmer Webber <cwebber <at> dustycloud.org>, 36957 <at> debbugs.gnu.org
Subject: [bug#36957] [PATCH 1/5] machine: Allow non-root users to deploy.
Date: Thu, 15 Aug 2019 17:07:07 +0200

Hi Jakob,

> * doc/guix.texi (Invoking guix deploy): Add section describing
> prerequisites for deploying as a non-root user.
> * guix/remote.scm (remote-pipe-for-gexp): New optional 'become-command'
> argument.
> (%remote-eval): New optional 'become-command' argument.
> (remote-eval): New 'become-command' keyword argument.
> * guix/ssh.scm (remote-inferior): New optional 'become-command'
> argument.  
> (inferior-remote-eval): New optional 'become-command' argument.
> (remote-authorize-signing-key): New optional 'become-command' argument.
> * gnu/machine/ssh.scm (machine-become-command): New variable.
> (managed-host-remote-eval): Invoke 'remote-eval' with the
> '#:become-command' keyword.
> (deploy-managed-host): Invoke 'remote-authorize-signing-key' with the
> '#:become-command' keyword.
[…]
> -(define (%remote-eval lowered session)
> +  (let ((pipe (apply open-remote-pipe* session OPEN_READ repl-command)))
> +    (when (eof-object? (peek-char pipe))
> +      (raise (condition
> +              (&message
> +               (message (format #f (G_ "failed to run '~{~a~^ ~}'")
> +                                repl-command))))))
> +    pipe))

This leads to a compile warning because G_ isn’t available.

-- 
Ricardo

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.