Ignore:
Timestamp:
Dec 28, 2009, 12:25:00 AM (12 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.6, release-1.7, release-1.8, release-1.9
Children:
85fa6e4
Parents:
3acab0e
git-author:
Nelson Elhage <nelhage@mit.edu> (12/23/09 12:28:51)
git-committer:
Nelson Elhage <nelhage@mit.edu> (12/28/09 00:25:00)
Message:
IRC: irc-disconnect on a pending reconnect should cancel it.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/IRC/lib/BarnOwl/Module/IRC/Connection.pm

    r3acab0e r416241f  
    328328}
    329329
     330sub cancel_reconnect {
     331    my $self = shift;
     332    delete $BarnOwl::Module::IRC::reconnect{$self->alias};
     333    delete $self->{reconnect_timer};
     334}
     335
    330336sub connected {
    331337    my $self = shift;
    332338    my $msg = shift;
    333339    BarnOwl::admin_message("IRC", $msg);
    334     delete $BarnOwl::Module::IRC::reconnect{$self->alias};
    335     delete $self->{reconnect_timer};
     340    $self->cancel_reconnect;
    336341    $BarnOwl::Module::IRC::ircnets{$self->alias} = $self;
    337342    my $fd = $self->getSocket()->fileno();
Note: See TracChangeset for help on using the changeset viewer.