Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/processone/ejabberd.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexey Shchepin <alexey@process-one.net>2017-11-02 19:48:35 +0300
committerAlexey Shchepin <alexey@process-one.net>2017-11-02 19:48:35 +0300
commit79a9a0ed291ab15c002fe129fc00e3d23fc7979c (patch)
treef825d45383a7d445c1ef7ae16f856ead51803e91
parent78dfb832b8e5b711cfbbe3131493057325c0008d (diff)
Disable server_host warnings
-rw-r--r--src/ejabberd_sql_pt.erl9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/ejabberd_sql_pt.erl b/src/ejabberd_sql_pt.erl
index 197e5ee6d..a32039436 100644
--- a/src/ejabberd_sql_pt.erl
+++ b/src/ejabberd_sql_pt.erl
@@ -701,8 +701,17 @@ filter_upsert_sh(Table, ParseRes) ->
end, ParseRes)
end.
+-ifdef(ENABLE_PT_WARNINGS).
+
add_warning(Pos, Warning) ->
Marker = erl_syntax:revert(
erl_syntax:warning_marker({Pos, ?MODULE, Warning})),
put(warnings, [Marker | get(warnings)]),
ok.
+
+-else.
+
+add_warning(_Pos, _Warning) ->
+ ok.
+
+-endif.