Commits

Pierre Surply committed e6a8e67

Fix %2F character

Comments (0)

Files changed (1)

     | _ -> ""
 
 let url_arg =
+  let regexsl = Str.regexp "%2F" in
+  let url = Str.global_replace regexsl "/" url in
   let regex = Str.regexp "\\([^/]*\\)/" in
   let rec build_url_arg s start =
     if (try Str.search_forward regex s start