commit - f17992d3c59761bfcb1fe2798552ca6595a0222e
commit + 2ee728628774ba06d13b5446c0b461935c4931d7
blob - 6999701c24c420fe883abffc3ff8a6ec8b61555f
blob + 3359121d5e0ea8e408cf575eaf96f842990bd212
--- lib/IRCNOW/IO/IRC.pm
+++ lib/IRCNOW/IO/IRC.pm
# {staff} needs to remain a string; {stafflist} is the array version
$self->{stafflist} = $self->{staff};
for my $param (qw(networks stafflist chans teamchans)) {
- $self->{$param} = [split(/[,\s]+/m, $self->{$param}]
+ $self->{$param} = [ split(/[,\s]+/m, $self->{$param}) ];
print Dumper($self->{$param});
}