X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgetter%2Fhttp_getter_env.ml;h=af5896ea83707901343e4fadfe6ccda1e60df189;hb=38ec119c163b0e6f97a9800933d5b71c065332e8;hp=79b0ab42ed927e36eca9d33a7b750f5911b40419;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git

diff --git a/helm/software/components/getter/http_getter_env.ml b/helm/software/components/getter/http_getter_env.ml
index 79b0ab42e..af5896ea8 100644
--- a/helm/software/components/getter/http_getter_env.ml
+++ b/helm/software/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 (