diff options
Diffstat (limited to 'gnu/machine')
| -rw-r--r-- | gnu/machine/ssh.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm index 73d5dc513e..0ce2860236 100644 --- a/gnu/machine/ssh.scm +++ b/gnu/machine/ssh.scm @@ -542,8 +542,8 @@ failed to switch systems while deploying '~a':~%~{~s ~}") host (inferior-exception-arguments c)))) os)) - (parameterize ((%current-system system) - (%current-target-system #f)) + (store-parameterize ((%current-system system) + (%current-target-system #f)) (with-roll-back #t (mbegin %store-monad (upgrade-shepherd-services (eval/error-handling c |