Commit 51450646 authored by gerd's avatar gerd

fix against change in ocamlnet-3.3.1

git-svn-id:[email protected] dbe99aee-44db-0310-b2b3-d33182c8eb97
parent 8efd4d54
......@@ -10,7 +10,7 @@
let crlf_re = Netstring_str.regexp "[\010\013]";;
let search_forward = Netstring_str.search_forward ~groups:0;;
let search_forward = Netstring_str.search_forward;;
let crlf_index_from s i =
try fst(search_forward crlf_re s i)
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment