From 8128937f6e9c8eb7898afad8b93451634a7150e7 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Wed, 13 Apr 2022 17:25:03 -0700 Subject: src/connection/rehome.lisp: drop a superfluous use of WITH-SLOTS Signed-off-by: Sean Whitton --- src/connection/rehome.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/connection') diff --git a/src/connection/rehome.lisp b/src/connection/rehome.lisp index 0a8a74c..791b3b4 100644 --- a/src/connection/rehome.lisp +++ b/src/connection/rehome.lisp @@ -48,8 +48,7 @@ (defmethod connection-clear-data-cache ((connection rehome-connection) iden1 iden2) - (with-slots (datadir) connection - (delete-remote-trees (data-pathname (datadir connection) iden1 iden2)))) + (delete-remote-trees (data-pathname (datadir connection) iden1 iden2))) (defmethod get-remote-cached-prerequisite-data ((connection rehome-connection)) -- cgit v1.2.3