oops

6 years ago · 1a0e9d1484
parent 5b2c9bb7ac
commit 1a0e9d1484
1 changed files with 2 additions and 2 deletions
--- a/pollen/private/preheat-cache.rkt
+++ b/pollen/private/preheat-cache.rkt
@ -14,8 +14,8 @@
  ;; seems like it would be slow to load cache.rktd but it's not.
  (define-values (_ private-cache-dir) (make-cache-dirs path))
  (define cache-db-file (build-path private-cache-dir "cache.rktd"))
-  (or (file-exists? cache-db-file)
-      (hash-has-key? (file->value cache-db-file) (paths->key path))))
+  (and (file-exists? cache-db-file)
+       (hash-has-key? (file->value cache-db-file) (paths->key path))))

 ;; compile a path inside a place (= parallel processing)
 (define (path-into-place starting-dir path)