Permalink
Browse files

[fix] mime: fixed a non handled case in the multipart parser

  • Loading branch information...
1 parent bfbf7bb commit 3c5338d49a61b616ef9157384cfb03cf0c7e1045 @Aqua-Ye Aqua-Ye committed Feb 24, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 stdlib/web/mail/mime.opa
View
@@ -198,9 +198,9 @@ Mime = {{
parser(b:string) =
delimiter =
- parser crlf_parser "--" Parser.of_string(b) -> void
+ parser (!"--" .)* "--" Parser.of_string(b) -> void
close_delimiter =
- parser delimiter "--" -> void
+ parser crlf_parser delimiter "--" -> void
body_part =
parser bp=(!(delimiter|close_delimiter) .)* ->
Text.to_string(Text.ltconcat(bp))

0 comments on commit 3c5338d

Please sign in to comment.