Small cleanup

master
Daniel Berteaud 10 years ago
parent e9bb0e1137
commit 88315e6423
  1. 5
      vroom.pl

@ -128,7 +128,10 @@ helper logout => sub {
helper create_room => sub {
my $self = shift;
my ($name,$owner) = @_;
$name = lc $name unless ($name eq lc $name);
# Convert room names to lowercase
if ($name ne lc $name){
$name = lc $name;
}
# Exit if the name isn't valid or already taken
return undef if ($self->get_room_by_name($name) || !$self->valid_room_name($name));
my $sth = eval {

Loading…
Cancel
Save