allow comments in setperms inputs
This commit is contained in:
parent
c59bf16942
commit
ef751c4d07
|
@ -401,7 +401,7 @@ sub get_set_perms
|
|||
$perms =~ s/^\s*R /READERS /mg;
|
||||
$perms =~ s/^\s*RW /WRITERS /mg;
|
||||
for my $g ($perms =~ /^\s*(\S+)/gm) {
|
||||
die "invalid permission category $g\n" unless $GL_WILDREPOS_PERM_CATS =~ /(^|\s)$g(\s|$)/;
|
||||
die "invalid permission category $g\n" unless $g =~ /^#/ or $GL_WILDREPOS_PERM_CATS =~ /(^|\s)$g(\s|$)/;
|
||||
}
|
||||
print "New perms are:\n";
|
||||
print $perms;
|
||||
|
|
Loading…
Reference in a new issue