ported to ocaml 3.08

[helm.git] / helm / ocaml / getter / http_getter_env.mli

diff --git a/helm/ocaml/getter/http_getter_env.mli b/helm/ocaml/getter/http_getter_env.mli
index cb1731792e1140fa5fa733367bc67b37802576d5..d3bc7f319ebb0b5b14673e33474e4488770d593a 100644 (file)
--- a/helm/ocaml/getter/http_getter_env.mli
+++ b/helm/ocaml/getter/http_getter_env.mli
@@ -47,13 +47,13 @@ val rdf_dir       : string lazy_t         (* RDFs' directory *)
 val dtd_dir       : string lazy_t         (* DTDs' root directory *)
 val servers_file  : string lazy_t         (* servers.txt file *)
 val port          : int lazy_t            (* port on which getter listens *)
-val dtd_base_url  : string lazy_t         (* base URL for DTD downloading *)
+val dtd_base_urls : string list lazy_t    (* base URLs for document patching *)
 
   (* {2 derived data} *)
 
 val host          : string lazy_t         (* host on which getter listens *)
 val my_own_url    : string lazy_t         (* URL at which contact getter *)
-val servers       : (int * string) list lazy_t
+val servers       : unit -> (int * string) list
                                     (* (position * server) list *)
 val cache_mode    : encoding lazy_t       (* cached files encoding *)