diff options
-rw-r--r-- | gnu/services/base.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm index e5c6bf5335..dfc7571e55 100644 --- a/gnu/services/base.scm +++ b/gnu/services/base.scm @@ -1178,7 +1178,13 @@ to use as the tty. This is primarily useful for headless systems." #$@(if term #~(#$term) #~()))) - (const #f)) ; never start. + #$(if tty + #~(const #f) ;always fail to start + #~(lambda _ ;succeed, but don't do anything + (format #t "~a: \ +no serial port console requested; doing nothing~%" + '#$(car provision)) + 'idle))) args))))) (stop #~(make-kill-destructor)))))) |