From 38ce8b494ed6bd78ca78350542900b80789e7cfc Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Tue, 16 Jun 2009 18:26:15 +0000
Subject: [PATCH] Provide explanation in error message when module is already
 started for another vhost

SVN Revision: 2299
---
 src/web/mod_http_bind.erl | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/src/web/mod_http_bind.erl b/src/web/mod_http_bind.erl
index 9f3dddbe6..1b9338554 100644
--- a/src/web/mod_http_bind.erl
+++ b/src/web/mod_http_bind.erl
@@ -3,7 +3,7 @@
 %%% Author  : Stefan Strigler <steve@zeank.in-berlin.de>
 %%% Purpose : Implementation of XMPP over BOSH (XEP-0206)
 %%% Created : Tue Feb 20 13:15:52 CET 2007
-%%% Id      : $Id: mod_http_bind.erl 440 2007-12-06 22:36:21Z badlop $
+%%% Id      : $Id: mod_http_bind.erl 514 2008-03-12 21:54:18Z badlop $
 %%%----------------------------------------------------------------------
 
 %%%----------------------------------------------------------------------
@@ -74,7 +74,7 @@ process(_Path, _Request) ->
 %%%----------------------------------------------------------------------
 %%% BEHAVIOUR CALLBACKS
 %%%----------------------------------------------------------------------
-start(_Host, _Opts) ->
+start(Host, _Opts) ->
     HTTPBindSupervisor =
         {ejabberd_http_bind_sup,
          {ejabberd_tmp_sup, start_link,
@@ -88,6 +88,11 @@ start(_Host, _Opts) ->
             ok;
         {ok, _Pid, _Info} ->
             ok;
+        {error, {already_started, _PidOther}} ->
+            ErrorText = "mod_http_bind is already started, "
+		"so it will not be started again for "
+		++ Host,
+            {'EXIT', {start_child_error, ErrorText}};
         {error, Error} ->
             {'EXIT', {start_child_error, Error}}
     end.