Don't ditch first line of headers when reading icy client data..

savonet · Jan 11, 2017 · 04c28e0 · 04c28e0
1 parent ef6bf6d
commit 04c28e0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/harbor/harbor.camlp4 b/src/harbor/harbor.camlp4
@@ -926,7 +926,7 @@ struct
             let lines =
               Pcre.split ~rex:(Pcre.regexp "[\r]?\n") s
             in
-            let headers = parse_headers (List.tl lines) in
+            let headers = parse_headers lines in
             handle_source_request ~port ~auth:true ~smethod:`Shout hprotocol
                                   h huri headers
           done