From 5d0587a6e2b982a9544050b8f63174d19deabfdb Mon Sep 17 00:00:00 2001
From: Thomas <thintz@hotpads.com>
Date: Thu, 10 Jul 2014 09:22:58 -0700
Subject: [PATCH] Removing deprecated with-bucket.

---
 amazon-s3.scm | 11 -----------
 1 file changed, 11 deletions(-)

diff --git a/amazon-s3.scm b/amazon-s3.scm
index 2586869..9fca2c1 100644
--- 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*)))