tags 878896 + patch fixed-upstream
thanks
This issue is already fixed upstream. Attached is a patch that fixes the
FTBFS (it's basically upstream
commit bf0640779b2e7095e01755d3660c7e3f0865171d).
Index: liquidsoap-1.1.1/src/decoder/decoder.ml
===================================================================
--- liquidsoap-1.1.1.orig/src/decoder/decoder.ml
+++ liquidsoap-1.1.1/src/decoder/decoder.ml
@@ -277,7 +277,7 @@ let get_image_file_decoder filename =
with
| Pervasives.Exit -> !ans
-exception Exit of stream_decoder
+exception Exit_decoder of stream_decoder
let get_stream_decoder mime kind =
try
@@ -287,13 +287,13 @@ let get_stream_decoder mime kind =
match try decoder mime kind with _ -> None with
| Some f ->
log#f 3 "Method %S accepted %S." name mime ;
- raise (Exit f)
+ raise (Exit_decoder f)
| None -> ()) (get_decoders conf_stream_decoders
stream_decoders);
log#f 3 "Unable to decode stream of type %S!" mime ;
None
with
- | Exit f -> Some f
+ | Exit_decoder f -> Some f
(** {1 Helpers for defining decoders} *)
