diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2004-07-13 12:25:21 +0000 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2004-07-13 12:25:21 +0000 |
commit | 63c1789b5edb177db6f5c0ae351815c584562cab (patch) | |
tree | 7fede3c61f74a6a228cffb11499ae6b222b0b67d /ocamldoc/odoc.ml | |
parent | 237006931a8e0e1aa292b93c14a1ab60d4138d53 (diff) | |
download | ocaml-63c1789b5edb177db6f5c0ae351815c584562cab.tar.gz |
Fusion des modifs faites sur la branche release jusqu'a la release 3.08.0
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6553 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc/odoc.ml')
-rw-r--r-- | ocamldoc/odoc.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ocamldoc/odoc.ml b/ocamldoc/odoc.ml index f4970bfd53..1d4df9c6a2 100644 --- a/ocamldoc/odoc.ml +++ b/ocamldoc/odoc.ml @@ -38,7 +38,7 @@ let (cmo_or_cma_opt, paths) = | _ :: q -> iter (f_opt, inc) q in - iter (None, [Odoc_config.custom_generators_path]) arg_list + iter (None, []) arg_list let _ = print_DEBUG "Fin analyse des arguments pour le dynamic load" @@ -50,7 +50,7 @@ let get_real_filename name = name else ( - let paths = Filename.current_dir_name :: paths in + let paths = Filename.current_dir_name :: paths @ [Odoc_config.custom_generators_path] in try let d = List.find (fun d -> Sys.file_exists (Filename.concat d name)) |