diff options
| -rw-r--r-- | ugarit-backend-s3.scm | 1 |
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")))) |