Commit d0592847 authored by Karoline Malmkjaer's avatar Karoline Malmkjaer
Browse files

added "generated"

parent 4f38033c
......@@ -90,7 +90,7 @@ let import_dtd ppf name src =
let dtd =
parse_dtd_entity { default_config with encoding = `Enc_utf8 } src in
Format.fprintf ppf
"(* This file has been automatically by dtd2cduce *)@\n";
"(* This file has been automatically generated by dtd2cduce *)@\n";
List.iter (fun x -> elt ppf (dtd # element x)) (dtd # element_names)
let main (cgi : Netcgi.std_activation) =
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment