Skip to content
Browse files

fixed bug in participants()

  • Loading branch information...
1 parent 5a8d2d9 commit 5f5efbdae73002d4e5e3ed37c6cd3f7a6528d220 @polettix committed
Showing with 7 additions and 1 deletion.
  1. +7 −1 lib/Narsil/Match.pm
View
8 lib/Narsil/Match.pm
@@ -149,10 +149,16 @@ sub _flagify {
sub participants {
my $self = shift;
my $p = $self->_participants();
- @$p = [@_] if @_;
+ @$p = @_ if @_;
return @$p;
} ## end sub participants
+sub set_participants {
+ my $self = shift;
+ @{$self->_participants()} = @_;
+ return $self;
+}
+
sub add_participant {
my ($self, $userid) = @_;
push @{$self->_participants()}, $userid;

0 comments on commit 5f5efbd

Please sign in to comment.
Something went wrong with that request. Please try again.