diff options
Diffstat (limited to 'gnu/machine/ssh.scm')
| -rw-r--r-- | gnu/machine/ssh.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm index ac3aa3e37..0df8b62da 100644 --- a/gnu/machine/ssh.scm +++ b/gnu/machine/ssh.scm @@ -61,7 +61,7 @@ ;;; This module implements remote evaluation and system deployment for ;;; machines that are accessible over SSH and have a known host-name. In the ;;; sense of the broader "machine" interface, we describe the environment for -;;; such machines as 'managed-host. +;;; such machines as "managed-host". ;;; ;;; Code: @@ -110,8 +110,8 @@ one from the configuration's parameters if one was not provided." ;;; (define (machine-become-command machine) - "Return as a list of strings the program and arguments necessary to run a -shell command with escalated privileges for MACHINE's configuration." + "Return as a list of strings the program and arguments necessary to run a shell command with +escalated privileges for MACHINE's configuration." (if (string= "root" (machine-ssh-configuration-user (machine-configuration machine))) '() @@ -119,7 +119,7 @@ shell command with escalated privileges for MACHINE's configuration." (define (managed-host-remote-eval machine exp) "Internal implementation of 'machine-remote-eval' for MACHINE instances with -an environment type of 'managed-host." +an environment type of 'managed-host-environment-type'." (maybe-raise-unsupported-configuration-error machine) (let ((config (machine-configuration machine))) (remote-eval exp (machine-ssh-session machine) @@ -363,7 +363,7 @@ the 'should-roll-back' field set to SHOULD-ROLL-BACK?" (define (deploy-managed-host machine) "Internal implementation of 'deploy-machine' for MACHINE instances with an -environment type of 'managed-host." +environment type of 'managed-host-environment-type'." (maybe-raise-unsupported-configuration-error machine) (when (machine-ssh-configuration-authorize? (machine-configuration machine)) @@ -400,7 +400,7 @@ have you run 'guix archive --generate-key?'") (define (roll-back-managed-host machine) "Internal implementation of 'roll-back-machine' for MACHINE instances with -an environment type of 'managed-host." +an environment type of 'managed-host-environment-type'." (define remote-exp (with-extensions (list guile-gcrypt) (with-imported-modules (source-module-closure '((guix config) |