added support for "ancient" HTTP requests like "GET /foo"

[helm.git] / helm / DEVEL / ocaml-http / http_message.mli

diff --git a/helm/DEVEL/ocaml-http/http_message.mli b/helm/DEVEL/ocaml-http/http_message.mli
index e3f06f03fd1a0ab44d1ed33505ffd7e39fb8a83a..9f730939b90ee885844ab92c6476d7e5003b99ee 100644 (file)
--- a/helm/DEVEL/ocaml-http/http_message.mli
+++ b/helm/DEVEL/ocaml-http/http_message.mli
@@ -25,11 +25,11 @@ open Http_types;;
   @param entity body included in the message
   @param headers message headers shipped with the message *)
 class virtual message:
-  body: string -> headers: (string * string) list -> version: version ->
+  body: string -> headers: (string * string) list -> version: version option ->
   clisockaddr: Unix.sockaddr -> srvsockaddr: Unix.sockaddr ->
     object
 
-      method version: version
+      method version: version option
       method setVersion: version -> unit
 
       method body: string