let title = "Unable to include " ^ what in
let message =
what ^ " is <b>not</b> handled by a development.\n" ^
- "All dependencies are authomatically solved for a development.\n\n" ^
+ "All dependencies are automatically solved for a development.\n\n" ^
"<i>Do you want to set up a development?</i>"
in
(match guistuff.ask_confirmation ~title ~message with
new_status
(** given a uri and a type list (the contructors types) builds a list of pairs
- * (name,uri) that is used to generate authomatic aliases **)
+ * (name,uri) that is used to generate automatic aliases **)
let extract_alias types uri =
fst(List.fold_left (
fun (acc,i) (name, _, _, cl) ->