diff options
| -rw-r--r-- | henrietta-cache.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/henrietta-cache.scm b/henrietta-cache.scm index d38021c..924b65a 100644 --- a/henrietta-cache.scm +++ b/henrietta-cache.scm @@ -1,4 +1,4 @@ -(use utils posix http-client matchable uri-common srfi-1) +(use utils posix setup-api http-client matchable uri-common srfi-1) (define (usage code) (print #<#EOF @@ -111,7 +111,7 @@ EOF (contents-dir (if (= 1 (length contents)) (make-pathname tmpdir (car contents)) tmpdir))) - (rename-file contents-dir cache-dir) + (move-file contents-dir cache-dir) (system (sprintf "rm -rf ~A" (qs tmpdir)))))) ((meta-file) (condition-case |