diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-21 17:21:11 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-21 17:22:25 -0700 |
commit | 3a7b35372040ca245969826bd5fa9f85a6980486 (patch) | |
tree | d42c5d2c28d4883e406606e2152f9f9bffc12741 /src/connection/ssh.lisp | |
parent | d6e52cbd4a178bdae7961c6f199a99724bb9d04e (diff) | |
download | consfigurator-3a7b35372040ca245969826bd5fa9f85a6980486.tar.gz |
add facility for more regular progress and debug printing
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection/ssh.lisp')
-rw-r--r-- | src/connection/ssh.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection/ssh.lisp b/src/connection/ssh.lisp index f4903b5..2098585 100644 --- a/src/connection/ssh.lisp +++ b/src/connection/ssh.lisp @@ -23,7 +23,7 @@ (hop (get-hostname)) user) (declare (ignore remaining)) - (format t "Establishing SSH connection to ~A~%" hop) + (informat 1 "~&Establishing SSH connection to ~A" hop) (mrun "ssh" "-fN" hop) (make-instance 'ssh-connection :hostname hop :user user)) |