Skip to content
This repository
Browse code

Amazon S3 XML encoding fix

  • Loading branch information...
commit 60b9937995d99c860b3b432bceacb1ac3c9a591b 1 parent 582f14f
Victor Nicollet authored November 29, 2012

Showing 1 changed file with 1 addition and 0 deletions. Show diff stats Hide diff stats

  1. 1  ohmAmazon/ohmAmazon.ml
1  ohmAmazon/ohmAmazon.ml
@@ -209,6 +209,7 @@ module S3 = functor(Account:ACCOUNT) -> struct
209 209
       let _,str = BatString.replace ~str ~sub:">" ~by:">" in
210 210
       let _,str = BatString.replace ~str ~sub:"&lt;" ~by:"<" in
211 211
       let _,str = BatString.replace ~str ~sub:"&quot;" ~by:"\"" in
  212
+      let _,str = BatString.replace ~str ~sub:"&apos;" ~by:"'" in
212 213
       let _,str = BatString.replace ~str ~sub:"&amp;" ~by:"&" in
213 214
       Some str
214 215
     with Not_found -> None

0 notes on commit 60b9937

Please sign in to comment.
Something went wrong with that request. Please try again.