Remove unnecessary interface args

mighty-gerbils · Oct 28, 2023 · e212567 · e212567
1 parent b39b507
commit e212567
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/src/std/net/s3/interface.ss b/src/std/net/s3/interface.ss
@@ -6,17 +6,15 @@
 
 (interface S3
   (get-bucket (name :~ string?))
-  (create-bucket! (name :~ string?)
-         (opts :~ (maybe alist?) := #f))
+  (create-bucket! (name :~ string?))
   (delete-bucket! (name :~ string?))
   (bucket-exists? (name :~ string?))
   (list-buckets))
 
 (interface S3Bucket
   (get  (name :~ string?))
   (put! (name :~ string?)
-        (data :~ u8vector?)
-        content-type: (content-type := "octet-stream" :~ string?))
+        (data :~ u8vector?))
   (delete! (name :~ string?))
   ; src should follow `bucket/file/path` format. Destination should just be `file/path`.
   ; Copies *from* src to *dest* in this ObjectMap.