Ignore:
Timestamp:
Apr 3, 2011, 3:06:02 PM (11 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.8, release-1.9
Children:
ab6d8f0
Parents:
b9a642a
git-author:
Nelson Elhage <nelhage@mit.edu> (03/12/11 11:41:48)
git-committer:
Nelson Elhage <nelhage@mit.edu> (04/03/11 15:06:02)
Message:
Use AnyEvent::IRC::Client's channel tracking, instead our own.
Location:
perl/modules/IRC/lib/BarnOwl/Module/IRC
Files:
2 edited

Legend:

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

    r955a36e rdace02a  
    1111sub complete_networks { keys %BarnOwl::Module::IRC::ircnets }
    1212sub complete_dests    { keys %users, complete_channels() }
    13 sub complete_channels { keys %BarnOwl::Module::IRC::channels }
     13sub complete_channels {
     14    my %channels;
     15    for my $conn (values %BarnOwl::Module::IRC::ircnets) {
     16        for my $chan (keys %{$conn->conn->{channel_list}}) {
     17            $channels{$chan} = 1;
     18        }
     19    }
     20    return keys %channels;
     21}
    1422sub complete_nicks    { keys %users }
    1523sub complete_servers  { keys %servers }
  • perl/modules/IRC/lib/BarnOwl/Module/IRC/Connection.pm

    rb9a642a rdace02a  
    452452    my $backoff = shift;
    453453
    454     $self->autoconnect_channels([keys(%{$self->channel_list})]);
     454    $self->autoconnect_channels([keys(%{$self->{channel_list}})]);
    455455    $self->conn->connect;
    456456    if ($self->conn->connected) {
Note: See TracChangeset for help on using the changeset viewer.