commit - 2ee728628774ba06d13b5446c0b461935c4931d7
commit + 197f12698d130e56e8cbadb4f4302d35ab76dfae
blob - 3359121d5e0ea8e408cf575eaf96f842990bd212
blob + 0ac98f7bfe06514105e10bfabae085e1ae5266db
--- lib/IRCNOW/IO/IRC.pm
+++ lib/IRCNOW/IO/IRC.pm
networks => \@networks,
};
# verify we have all required params
- my @required = qw(networks stafflocalnet nick host port pass expires chans teamchans);
+ my @required = qw(networks staff localnet nick host port pass expires chans teamchans);
for my $param (@required) {
die "Required param '$param' missing in IRCNOW::IO::IRC::new()"
unless exists $options->{$param};
$self->{stafflist} = $self->{staff};
for my $param (qw(networks stafflist chans teamchans)) {
$self->{$param} = [ split(/[,\s]+/m, $self->{$param}) ];
-print Dumper($self->{$param});
}
# Set global for non-oop calls