Changeset f1a2736 for perl/modules
- Timestamp:
- Oct 27, 2009, 12:41:17 AM (15 years ago)
- Branches:
- master, release-1.10, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
- Children:
- 050d25e
- Parents:
- 6fc40a7
- git-author:
- Alejandro R. Sedeño <asedeno@mit.edu> (10/24/09 20:58:04)
- git-committer:
- Alejandro R. Sedeño <asedeno@mit.edu> (10/27/09 00:41:17)
- Location:
- perl/modules
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
rda554da rf1a2736 381 381 $ircnets{$alias} = $conn; 382 382 my $fd = $conn->getSocket()->fileno(); 383 BarnOwl::add_ dispatch($fd, \&OwlProcess);383 BarnOwl::add_io_dispatch($fd, 'r', \&OwlProcess); 384 384 $conn->{FD} = $fd; 385 385 } else { -
perl/modules/IRC/lib/BarnOwl/Module/IRC/Connection.pm
r7cfb1df rf1a2736 210 210 } 211 211 } 212 BarnOwl::remove_ dispatch($self->{FD});212 BarnOwl::remove_io_dispatch($self->{FD}); 213 213 BarnOwl::admin_message('IRC', 214 214 "[" . $self->alias . "] Disconnected from server"); -
perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm
rf3678c3 rf1a2736 471 471 $conn->renameConnection($jidStr, $fullJid); 472 472 queue_admin_msg("Connected to jabber as $fullJid"); 473 # The remove_ dispatch() method is called from the473 # The remove_io_dispatch() method is called from the 474 474 # ConnectionManager's removeConnection() method. 475 475 $client->{fileno} = $client->getSocket()->fileno(); 476 476 #queue_admin_msg("Connected to jabber as $fullJid ($client->{fileno})"); 477 BarnOwl::add_ dispatch($client->{fileno}, sub { $client->OwlProcess($fullJid) });477 BarnOwl::add_io_dispatch($client->{fileno}, 'r', sub { $client->OwlProcess($fullJid) }); 478 478 479 479 # populate completion from roster. -
perl/modules/Jabber/lib/BarnOwl/Module/Jabber/ConnectionManager.pm
r8590774 rf1a2736 37 37 return 0 unless exists $self->{$jidStr}; 38 38 39 BarnOwl::remove_ dispatch($self->{$jidStr}->{Client}->{fileno}) if $self->{$jidStr}->{Client}->{fileno};39 BarnOwl::remove_io_dispatch($self->{$jidStr}->{Client}->{fileno}) if $self->{$jidStr}->{Client}->{fileno}; 40 40 $self->{$jidStr}->{Client}->Disconnect() 41 41 if $self->{$jidStr}->{Client}; … … 55 55 } 56 56 57 BarnOwl::remove_ dispatch($self->{$jidStr}->{Client}->{fileno}) if $self->{$jidStr}->{Client}->{fileno};57 BarnOwl::remove_io_dispatch($self->{$jidStr}->{Client}->{fileno}) if $self->{$jidStr}->{Client}->{fileno}; 58 58 $self->{$jidStr}->{Client}->Disconnect() 59 59 if $self->{$jidStr}->{Client};
Note: See TracChangeset
for help on using the changeset viewer.