Add password to the list of reserved words

master
Daniel Berteaud 11 years ago
parent 163121d57f
commit e70be95255
  1. 2
      public/vroom.pl

@ -212,7 +212,7 @@ helper valid_room_name => sub {
my $ret = undef; my $ret = undef;
my $len = length $name; my $len = length $name;
# A few names are reserved # A few names are reserved
my @reserved = qw(about help feedback goodbye admin create localize action missing dies); my @reserved = qw(about help feedback goodbye admin create localize action missing dies password);
if ($len > 0 && $len < 50 && $name =~ m/^[\w\-]+$/ && !grep { $name eq $_ } @reserved){ if ($len > 0 && $len < 50 && $name =~ m/^[\w\-]+$/ && !grep { $name eq $_ } @reserved){
$ret = 1; $ret = 1;
} }

Loading…
Cancel
Save