tjhintz/chicken-scheme-amazon-s3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Removing deprecated with-bucket.

Browse Source
This commit is contained in:
Thomas
2014-07-10 09:22:58 -07:00
parent e2f0e718eb
commit 5d0587a6e2
1 changed files with 0 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
amazon-s3.scm
View File

@@ -152,17 +152,6 @@
;;; api ;;; 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) (define (list-buckets)
(perform-aws-request sxpath: '(x:ListAllMyBucketsResult x:Buckets x:Bucket x:Name *text*))) (perform-aws-request sxpath: '(x:ListAllMyBucketsResult x:Buckets x:Bucket x:Name *text*)))