On Sun, Sep 9, 2007 at 12:58:40 -0700, [EMAIL PROTECTED] wrote:
> Log Message:
> -----------
> 2007/09/09 21:56:44 [threads:1] thread "http polling" failed: hd
> Thread 4 killed on uncaught exception Failure("hd")
> 2007/09/09 21:56:44 [main:3] Shutdown started!
>
> Modified Paths:
> --------------
> trunk/liquidsoap/src/sources/http_source.ml
>
> Modified: trunk/liquidsoap/src/sources/http_source.ml
> ===================================================================
> --- trunk/liquidsoap/src/sources/http_source.ml 2007-09-09 15:57:29 UTC
> (rev 4547)
> +++ trunk/liquidsoap/src/sources/http_source.ml 2007-09-09 19:58:40 UTC
> (rev 4548)
> @@ -317,7 +317,7 @@
> let f (_,b) = b in
> test_playlist (fun x -> f (Playlist_parser.search_valid x))
> with
> - | Not_found -> ()
> + | _ -> ()
> end;
> self#log#f 4 "Content-type \"%s\"." content_type ;
> if chunked then self#log#f 4 "Chunked HTTP/1.1 transfer" ;
>
>
ewww. shouldn't the error checking be done by whatever is calling
List.hd instead of here?
Cheers,
Julien
