diff options
-rw-r--r-- | henrietta-cache.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/henrietta-cache.scm b/henrietta-cache.scm index a338667..474e033 100644 --- a/henrietta-cache.scm +++ b/henrietta-cache.scm @@ -124,7 +124,7 @@ EOF (begin (copy-file tmp-file cache-file) (delete-file tmp-file) )))) - (directory tmp-dir) ) + (directory tmp-dir #t) ) (delete-directory tmp-dir #t) ) ;nb: don't like recursive but top level has hidden contents and don't want those (define (download-files-from-list base-uri files cache-dir) |