Properly normalize resource_regexp acl rule

This fixes issue #1288.

diff --git a/src/acl.erl b/src/acl.erl
index 8979969764e1fb4bf814b96099516eb33b0ce35c..bf17e8a1a1a9bbaecbe7260697dc1a433a95e5fc 100644 (file)
--- a/src/acl.erl
+++ b/src/acl.erl
@@ -262,6 +262,7 @@ normalize_spec(Spec) ->
         {server, S} -> {server, nameprep(S)};
         {resource, R} -> {resource, resourceprep(R)};
         {server_regexp, SR} -> {server_regexp, b(SR)};
+        {resource_regexp, R} -> {resource_regexp, b(R)};
         {server_glob, S} -> {server_glob, b(S)};
         {resource_glob, R} -> {resource_glob, b(R)};
         {ip, {Net, Mask}} -> {ip, {Net, Mask}};
@@ -687,6 +688,7 @@ transform_options({acl, Name, Type}, Opts) ->
             {server_glob, S} -> {server_glob, [b(S)]};
             {ip, S} -> {ip, [b(S)]};
             {resource_glob, R} -> {resource_glob, [b(R)]}
+            {resource_regexp, R} -> {resource_regexp, [b(R)]}
         end,
     [{acl, [{Name, [T]}]}|Opts];
 transform_options({access, Name, Rules}, Opts) ->