From: Evgeny Khramtsov <ekhramtsov@process-one.net>
Date: Sat, 6 Jul 2019 07:38:25 +0000 (+0300)
Subject: Fix validator of option ejabberd_service->hosts
X-Git-Tag: 19.08~122
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=1663e78cf7a2317879cde577ac1518d14ba5a4f0;p=ejabberd

Fix validator of option ejabberd_service->hosts

Fixes #2929
---

diff --git a/src/ejabberd_service.erl b/src/ejabberd_service.erl
index 8e29577c8..45903a01a 100644
--- a/src/ejabberd_service.erl
+++ b/src/ejabberd_service.erl
@@ -264,14 +264,12 @@ listen_opt_type(check_from) ->
 listen_opt_type(password) ->
     econf:binary();
 listen_opt_type(hosts) ->
-    econf:and_then(
-      econf:map(
-	econf:domain(),
+    econf:map(
+      econf:domain(),
+      econf:and_then(
 	econf:options(
-	  #{password => econf:binary()})),
-      fun({Host, Opts}) ->
-	      {Host, proplists:get_value(password, Opts)}
-      end);
+	  #{password => econf:binary()}),
+	fun(Opts) -> proplists:get_value(password, Opts) end));
 listen_opt_type(global_routes) ->
     econf:bool().