From ee456cc2afaa223f5086c54a17fdbcb3e90aaf8d Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Thu, 24 Sep 2015 17:21:14 +0200
Subject: [PATCH] Fix regression introduced when code was binarized (EJAB-641)

---
 src/ejabberd_auth_external.erl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/ejabberd_auth_external.erl b/src/ejabberd_auth_external.erl
index 9dcf3410f..4d11507ee 100644
--- a/src/ejabberd_auth_external.erl
+++ b/src/ejabberd_auth_external.erl
@@ -311,7 +311,9 @@ get_mod_last_configured(Server) ->
     end.
 
 is_configured(Host, Module) ->
-    gen_mod:is_loaded(Host, Module).
+    Os = ejabberd_config:get_local_option({modules, Host},
+					  fun(M) when is_list(M) -> M end),
+    lists:keymember(Module, 1, Os).
 
 opt_type(extauth_cache) ->
     fun (false) -> undefined;
-- 
2.40.0