support mime types for uploads

support/aws/s3

@@ -138,6 +138,9 @@ s3_curl() {
 	  arg="-T" inout="${4}"
 	  headers[${#headers[@]}]="x-amz-acl: public-read"
 	  headers[${#headers[@]}]="Expect: 100-continue"
+		if [ "$mime" != "" ]; then
+		  headers[${#headers[@]}]="Content-Type: $mime"
+		fi
 	else
 	  die "Cannot write non-existing file ${4}"
         fi
@@ -162,7 +165,8 @@ s3_put() {
   # $1 = remote bucket to put it into
   # $2 = remote name to put
   # $3 = file to put.  This must be present if $2 is.
-  s3_curl PUT "${1}" "${2}" "${3:-${2}}"
+  # $4 = mime type
+  s3_curl PUT "${1}" "${2}" "${3:-${2}}" "${4}"
   return $?
 }