X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fgetter%2Fhttp_getter_env.ml;h=af5896ea83707901343e4fadfe6ccda1e60df189;hb=a957099550619f87a58be467b9b11f2ad6501378;hp=79b0ab42ed927e36eca9d33a7b750f5911b40419;hpb=7f2444c2670cadafddd8785b687ef312158376b0;p=helm.git

diff --git a/components/getter/http_getter_env.ml b/components/getter/http_getter_env.ml
index 79b0ab42e..af5896ea8 100644
--- a/components/getter/http_getter_env.ml
+++ b/components/getter/http_getter_env.ml
@@ -39,7 +39,7 @@ let prefix_RE = Pcre.regexp "^\\s*([^\\s]+)\\s+([^\\s]+)\\s*(.*)$"
 
 let cache_dir  = lazy (normalize_dir (Helm_registry.get "getter.cache_dir"))
 let dtd_dir = lazy (
-  match Helm_registry.get_opt Helm_registry.get_string "getter.dtd_dir" with
+  match Helm_registry.get_opt Helm_registry.string "getter.dtd_dir" with
   | None -> None
   | Some dir -> Some (normalize_dir dir))
 let dtd_base_urls  = lazy (