Start supervisor here (thanks to Stefan Strigler)

SVN Revision: 2200

diff --git a/src/web/mod_http_bind.erl b/src/web/mod_http_bind.erl
index c57624e36a65c5464d76324d30dfaff0aaf8a3ee..34ed887229556e985ed7ac223a2fe5ced28edf3b 100644 (file)
--- a/src/web/mod_http_bind.erl
+++ b/src/web/mod_http_bind.erl
@@ -74,9 +74,18 @@ process(_Path, _Request) ->
 %%%----------------------------------------------------------------------
 %%% BEHAVIOUR CALLBACKS
 %%%----------------------------------------------------------------------
-
 start(_Host, _Opts) ->
-       ok.
+    supervisor:start_child(
+      ejabberd_sup,
+      {ejabberd_http_bind_sup,
+       {ejabberd_tmp_sup, start_link,
+        [ejabberd_http_bind_sup, ejabberd_http_bind]},
+       permanent,
+       infinity,
+       supervisor,
+       [ejabberd_tmp_sup]}),
+    ok.
 
 stop(_Host) ->
-       ok.
+    supervisor:terminate_child(ejabberd_sup, ejabberd_http_bind_sup),
+    ok.