Vocabulary
s3.private

Inputs
s3-requestan object


Outputs
stringan object


Definition


: s3-url ( s3-request -- string )
[
"http://" % dup bucket>> [ % "." % ] when*
"s3.amazonaws.com" % path>> %
] "" make ;