From 375b35ae4c4b3c44891b51df9cf21f71c1def232 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 25 Mar 2021 10:48:10 -0700 Subject: reformat Signed-off-by: Sean Whitton --- src/connection.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/connection.lisp') diff --git a/src/connection.lisp b/src/connection.lisp index 97de468..df15390 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -247,8 +247,8 @@ the working directory of the Lisp process using UIOP:WITH-CURRENT-DIRECTORY." (or *remote-current-directory* (slot-value *connection* 'remote-home) (setf (slot-value *connection* 'remote-home) - (let ((home (stripln - (connection-run *connection* "echo $HOME" nil)))) + (let ((home + (stripln (connection-run *connection* "echo $HOME" nil)))) (if (string-equal "" home) (error "Failed to determine remote home directory.") (ensure-directory-pathname home)))))) -- cgit v1.2.3