X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fgetter%2FclientHTTP.ml;h=fc319e5834fc6d2755e12d7ac3b18d09a8a914e1;hb=1374bbf2975b043cd20666bea818528f5fcf8450;hp=2444bded35afc1eab918c5a118b477f4a8be5bd4;hpb=bac72fcaa876137ab7a5630e0c1badc2a627dce8;p=helm.git diff --git a/helm/ocaml/getter/clientHTTP.ml b/helm/ocaml/getter/clientHTTP.ml index 2444bded3..fc319e583 100644 --- a/helm/ocaml/getter/clientHTTP.ml +++ b/helm/ocaml/getter/clientHTTP.ml @@ -27,14 +27,14 @@ exception HttpClientError of exn * string;; let send cmd = try - ignore (Http_client.Convenience.http_get cmd) + ignore (Http_client.http_get cmd) with e -> raise (HttpClientError (e,cmd)) ;; let get uri = try - Http_client.Convenience.http_get uri + Http_client.http_get uri with e -> raise (HttpClientError (e,uri)) ;;