- added support for empty bindings like "a=" or simple "a" in query

[helm.git] / helm / DEVEL / ocaml-http / http_daemon.ml

diff --git a/helm/DEVEL/ocaml-http/http_daemon.ml b/helm/DEVEL/ocaml-http/http_daemon.ml
index 0a0f47775da721d4edac7980be759b299f6f4e7f..f2f70a03729932c647507f37e3cd712b9490431b 100644 (file)
--- a/helm/DEVEL/ocaml-http/http_daemon.ml
+++ b/helm/DEVEL/ocaml-http/http_daemon.ml
@@ -313,11 +313,11 @@ let start
     | Malformed_query query ->
         respond_error
           ~code:400 ~body:(sprintf "Malformed query string '%s'" query) outchan
-    | Malformed_query_binding (binding, query) ->
+    | Malformed_query_part (binding, query) ->
         respond_error
           ~code:400
           ~body:(
-            sprintf "Malformed query element '%s' in query '%s'" binding query)
+            sprintf "Malformed query part '%s' in query '%s'" binding query)
           outchan
   in
   match mode with