Removing deprecated with-bucket.

11 years ago · 5d0587a6e2
parent e2f0e718eb
commit 5d0587a6e2
1 changed files with 0 additions and 11 deletions
--- a/amazon-s3.scm
+++ b/amazon-s3.scm
@ -152,17 +152,6 @@

 ;;; api

-; broken and deprecated
-; next version will have parameterized keywords so this
-; won't be necessary
-(define-syntax with-bucket
-  (syntax-rules ()
-    ((with-bucket bucket (func p1 ...))
-     (func bucket p1 ...))
-    ((with-bucket bucket exp body ...)
-     (begin (with-bucket bucket exp)
-            (with-bucket bucket body ...)))))
-
 (define (list-buckets)
  (perform-aws-request sxpath: '(x:ListAllMyBucketsResult x:Buckets x:Bucket x:Name *text*)))