Removing deprecated with-bucket.

2014-07-10 09:22:58 -07:00
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*)))