From 3a7b35372040ca245969826bd5fa9f85a6980486 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 21 Mar 2021 17:21:11 -0700 Subject: add facility for more regular progress and debug printing Signed-off-by: Sean Whitton --- src/connection/sudo.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/connection/sudo.lisp') diff --git a/src/connection/sudo.lisp b/src/connection/sudo.lisp index db0111a..3c7c633 100644 --- a/src/connection/sudo.lisp +++ b/src/connection/sudo.lisp @@ -61,7 +61,7 @@ user password) (declare (ignore remaining)) - (format t "Establishing sudo connection to ~A~%" user) + (informat 1 "~&Establishing sudo connection to ~A" user) (make-instance 'sudo-connection :user user ;; we'll send the password followed by ^M, then the real -- cgit v1.2.3