X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fgetter%2Fhttp_getter_types.ml;fp=helm%2Focaml%2Fgetter%2Fhttp_getter_types.ml;h=1574e2bdb12e4249a82a421602194325dbc343ae;hb=617285cac8aabbe62699d5d7144b0df4f5771000;hp=e8e31bd0fdff90f9e595d1647ea40643a1f906e4;hpb=df297b3b5937180caf9c1be52b18c1d29d7112de;p=helm.git

diff --git a/helm/ocaml/getter/http_getter_types.ml b/helm/ocaml/getter/http_getter_types.ml
index e8e31bd0f..1574e2bdb 100644
--- a/helm/ocaml/getter/http_getter_types.ml
+++ b/helm/ocaml/getter/http_getter_types.ml
@@ -36,6 +36,7 @@ exception Cache_failure of string
 exception Dtd_not_found of string (* dtd's url *)
 exception Key_already_in of string;;
 exception Key_not_found of string;;
+exception Http_client_error of string * string  (* url, error message *)
 
 type encoding = [ `Normal | `Gzipped ]
 type answer_format = [ `Text | `Xml ]