- added support for 'reload' method which is supposed to be invoked on

[helm.git] / helm / http_getter / http_getter_env.mli

diff --git a/helm/http_getter/http_getter_env.mli b/helm/http_getter/http_getter_env.mli
index 9c66f8ff7a0dd18f2844c358527b079044ce33de..95378a3c7ead32b057ece202d0a1ef4fa51cddee 100644 (file)
--- a/helm/http_getter/http_getter_env.mli
+++ b/helm/http_getter/http_getter_env.mli
@@ -36,7 +36,6 @@
   val xsl_index     : string        (* XSLTs' index *)
   val xml_dir       : string        (* XMLs' directory *)
   val rdf_dir       : string        (* RDFs' directory *)
-  val xsl_dir       : string        (* XSLs' directory *)
   val dtd_dir       : string        (* DTDs' root directory *)
   val servers_file  : string        (* servers.txt file *)
   val port          : int           (* port on which getter listens *)
@@ -44,15 +43,16 @@
 
   (* derived data *)
 
-  val host          : string        (* host on which getter listens *)
-  val my_own_url    : string        (* URL at which contact getter *)
-  val servers       : string list   (* servers list (i.e. servers_file lines) *)
+  val host          : string          (* host on which getter listens *)
+  val my_own_url    : string          (* URL at which contact getter *)
+  val servers       : string list ref (* servers list *)
   val cache_mode    : http_getter_encoding  (* cached files encoding *)
-  val conf_file     : string        (* configuration file's full path *)
-  val conf_dir      : string        (* directory where conf_file resides *)
+  val conf_file     : string          (* configuration file's full path *)
+  val conf_dir      : string          (* directory where conf_file resides *)
 
   (* misc *)
 
+val reload: unit -> unit          (* reload servers list *)
 val dump_env : unit -> unit       (* dump a textual representation of the
                                   current http_getter settings *)