|
@@ -2145,7 +2145,7 @@ let configure gen =
|
|
let full_path = gen.gcon.file ^ "/src/" ^ name in
|
|
let full_path = gen.gcon.file ^ "/src/" ^ name in
|
|
mkdir_from_path full_path;
|
|
mkdir_from_path full_path;
|
|
|
|
|
|
- let f = open_out full_path in
|
|
|
|
|
|
+ let f = open_out_bin full_path in
|
|
output_string f v;
|
|
output_string f v;
|
|
close_out f
|
|
close_out f
|
|
) gen.gcon.resources;
|
|
) gen.gcon.resources;
|