Bug#667447: another patch for ocamlsdl-0.9.0

[Florent Monnier <monnier.florent@gmail.com>]

Hi Olivier,

A typo in sdlmixer.
I've not tested it, anyway this patch has to be applied.

Cheers

diff -Naur ocamlsdl-0.9.0.orig/src/sdlmixer.ml ocamlsdl-0.9.0.sdlmixer_group_channels/src/sdlmixer.ml
--- ocamlsdl-0.9.0.orig/src/sdlmixer.ml	2011-04-10 14:44:12.000000000 +0200
+++ ocamlsdl-0.9.0.sdlmixer_group_channels/src/sdlmixer.ml	2012-06-14 17:22:33.000000000 +0200
@@ -94,7 +94,7 @@
 let num_channels () = allocate_channels ~-1
 external reserve_channels : int -> int = "sdlmixer_reserve_channels"
 external group_channel : channel -> group -> unit = "sdlmixer_group_channel"
-external group_channels : from_c:channel -> to_c:channel -> group -> unit = "sdlmixer_group_channel"
+external group_channels : from_c:channel -> to_c:channel -> group -> unit = "sdlmixer_group_channels"
 external group_available : group -> channel = "sdlmixer_group_available"
 external group_count : group -> int = "sdlmixer_group_count"
 external group_oldest : group -> channel = "sdlmixer_group_oldest"
diff -Naur ocamlsdl-0.9.0.orig/src/sdlmixer.mli ocamlsdl-0.9.0.sdlmixer_group_channels/src/sdlmixer.mli
--- ocamlsdl-0.9.0.orig/src/sdlmixer.mli	2011-04-10 14:44:12.000000000 +0200
+++ ocamlsdl-0.9.0.sdlmixer_group_channels/src/sdlmixer.mli	2012-06-14 17:23:05.000000000 +0200
@@ -191,7 +191,7 @@
    If group is [default_group], the tag is removed.
 *)
 
-external group_channels : from_c:channel -> to_c:channel -> group -> unit = "sdlmixer_group_channel"
+external group_channels : from_c:channel -> to_c:channel -> group -> unit = "sdlmixer_group_channels"
 (** Same as above but for a range of channels. *)
 
 external group_count : group -> int = "sdlmixer_group_count"