summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ugarit-backend-s3.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/ugarit-backend-s3.scm b/ugarit-backend-s3.scm
index 4708418..2c59d20 100644
--- a/ugarit-backend-s3.scm
+++ b/ugarit-backend-s3.scm
@@ -164,6 +164,7 @@
(lambda () (void)) ; flush! - a no-op for us
(lambda (key) ; exists?
(and (object-exists? (make-name key ".data"))
+ (object-exists? (make-name key ".type"))
(get-sexp (make-name key ".type"))))
(lambda (key) ; get
(maybe-missing (get-u8vector (make-name key ".data"))))