diff options
| -rw-r--r-- | ocamldoc/odoc_merge.ml | 2 | ||||
| -rw-r--r-- | ocamldoc/odoc_messages.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ocamldoc/odoc_merge.ml b/ocamldoc/odoc_merge.ml index 310257b6b..5aefbeac2 100644 --- a/ocamldoc/odoc_merge.ml +++ b/ocamldoc/odoc_merge.ml @@ -996,7 +996,7 @@ let merge merge_options modules_list = raise (Failure (Odoc_messages.two_interfaces m.m_name)) ) | _ -> - (* two many Module.t ! *) + (* too many Module.t ! *) raise (Failure (Odoc_messages.too_many_module_objects m.m_name)) in diff --git a/ocamldoc/odoc_messages.ml b/ocamldoc/odoc_messages.ml index e5f684874..169e2ba36 100644 --- a/ocamldoc/odoc_messages.ml +++ b/ocamldoc/odoc_messages.ml @@ -258,7 +258,7 @@ let implicit_match_in_parameter = "Parameters contain implicit pattern matching. let unknown_extension f = "Unknown extension for file "^f^"." let two_implementations name = "There are two implementations of module "^name^"." let two_interfaces name = "There are two interfaces of module "^name^"." -let too_many_module_objects name = "There are two many interfaces/implementation of module "^name^"." +let too_many_module_objects name = "There are too many interfaces/implementation of module "^name^"." let exception_not_found_in_implementation exc m = "Exception "^exc^" was not found in implementation of module "^m^"." let type_not_found_in_implementation exc m = "Type "^exc^" was not found in implementation of module "^m^"." let module_not_found_in_implementation m m2 = "Module "^m^" was not found in implementation of module "^m2^"." |