From b13f9f342dc7ad91ace95f1cadb2f6dd0d2a543e Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Tue, 6 Apr 2021 19:23:55 -0700 Subject: rename and use DELETE-REMOTE-TREE->DELETE-REMOTE-TREES Signed-off-by: Sean Whitton --- src/data.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/data.lisp') diff --git a/src/data.lisp b/src/data.lisp index 7772e33..640c057 100644 --- a/src/data.lisp +++ b/src/data.lisp @@ -295,7 +295,7 @@ new versions of data, to avoid them piling up.")) (defmethod connection-clear-data-cache ((connection connection) iden1 iden2) (let* ((*connection* connection) (dir (ensure-directory-pathname (remote-data-pathname iden1 iden2)))) - (mrun "rm" "-rf" dir))) + (delete-remote-trees dir))) (defun upload-all-prerequisite-data (&key (upload-string-data t) (connection *connection*)) -- cgit v1.2.3