diff options
Diffstat (limited to 'gnu/services')
| -rw-r--r-- | gnu/services/ssh.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gnu/services/ssh.scm b/gnu/services/ssh.scm index d5c1c778009..675a15b6350 100644 --- a/gnu/services/ssh.scm +++ b/gnu/services/ssh.scm | |||
| @@ -622,7 +622,9 @@ object." | |||
| 622 | (port autossh-configuration-port | 622 | (port autossh-configuration-port |
| 623 | (default "0")) | 623 | (default "0")) |
| 624 | (ssh-options autossh-configuration-ssh-options | 624 | (ssh-options autossh-configuration-ssh-options |
| 625 | (default '()))) | 625 | (default '())) |
| 626 | (auto-start? autossh-configuration-auto-start? | ||
| 627 | (default #t))) | ||
| 626 | 628 | ||
| 627 | (define (autossh-file-name config file) | 629 | (define (autossh-file-name config file) |
| 628 | "Return a path in /var/run/autossh/ that is writable | 630 | "Return a path in /var/run/autossh/ that is writable |
| @@ -670,7 +672,8 @@ object." | |||
| 670 | (autossh-configuration-message config)) | 672 | (autossh-configuration-message config)) |
| 671 | #$(string-append "AUTOSSH_PORT=" | 673 | #$(string-append "AUTOSSH_PORT=" |
| 672 | (autossh-configuration-port config))))) | 674 | (autossh-configuration-port config))))) |
| 673 | (stop #~(make-kill-destructor)))) | 675 | (stop #~(make-kill-destructor)) |
| 676 | (auto-start? (autossh-configuration-auto-start? config)))) | ||
| 674 | 677 | ||
| 675 | (define (autossh-service-activation config) | 678 | (define (autossh-service-activation config) |
| 676 | (with-imported-modules '((guix build utils)) | 679 | (with-imported-modules '((guix build utils)) |