From 6ac8f6eaee7104bd483d7b54ae1f24cc3a691959 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pawe=C5=82=20Chmielowski?= <pchmielowski@process-one.net>
Date: Fri, 11 May 2018 12:24:00 +0200
Subject: [PATCH] Relax check for valid command name in access_persmissions

---
 src/ejabberd_access_permissions.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ejabberd_access_permissions.erl b/src/ejabberd_access_permissions.erl
index 3a7f81d53..23dd9446d 100644
--- a/src/ejabberd_access_permissions.erl
+++ b/src/ejabberd_access_permissions.erl
@@ -506,7 +506,7 @@ is_valid_command_name2(<<>>) ->
     true;
 is_valid_command_name2(<<K:8, Rest/binary>>) when (K >= $a andalso K =< $z)
 						  orelse (K >= $0 andalso K =< $9)
-						  orelse K == $_ ->
+						  orelse K == $_ orelse K == $- ->
     is_valid_command_name2(Rest);
 is_valid_command_name2(_) ->
     false.