signal_add_first('complete word', \&sig_complete);
sub push_output {
- unshift(@putputstack, shift);
+ unshift(@outputstack, shift);
}
sub pop_output {
shift(@outputstack);
- unless(@outputstack) @outputstack = (undef);
+ @outputstack = (undef) unless (@outputstack);
}
my $videosite_commands = {
write_debug("found $g->{'TYPE'} $g->{'NAME'}");
if ($type eq $g->{'TYPE'}) {
push(@g, $g);
- $g->setio(sub {Irssi::print(shift)});
+ $g->setio(\&write_irssi);
} else {
write_irssi('%s has wrong type (got %s, expected %s)', $p, $g->{'TYPE'}, $type);
delete($INC{$p});
Irssi::command_bind(_bcb('videosite' => \&cmdhandler));
}
- write_irssi('videosite initialized');
+ write_irssi('initialized successfully');
}
sub sig_complete {