From 0f5aedbf22b314a36923dbf6ab79a9c7f7ebe0f4 Mon Sep 17 00:00:00 2001 From: Thomas Hintz Date: Tue, 24 Sep 2013 17:47:08 -0700 Subject: [PATCH] Mark with-bucket as deprecated. --- amazon-s3.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/amazon-s3.scm b/amazon-s3.scm index 17a743f..2586869 100644 --- a/amazon-s3.scm +++ b/amazon-s3.scm @@ -111,9 +111,6 @@ (reader-thunk read-string) (content-type "application/x-www-form-urlencoded") (content-length 0)) - ;(handle-exceptions - ; exn - ; ((condition-property-accessor 'client-error 'body) exn) (with-input-from-request (aws-request bucket path verb no-auth: no-auth content-type: content-type content-length: content-length) body @@ -155,6 +152,9 @@ ;;; 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 ...))