- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
r9c7a701 rcab045b 69 69 } 70 70 71 #sub mainloop_hook { 72 # return unless defined $irc; 73 # eval { 74 # $irc->do_one_loop(); 75 # }; 76 # return; 77 #} 78 79 sub OwlProcess { 71 sub mainloop_hook { 80 72 return unless defined $irc; 81 73 eval { … … 84 76 return; 85 77 } 86 87 78 88 79 sub register_handlers { … … 118 109 $BarnOwl::Hooks::startup->add(\&startup); 119 110 $BarnOwl::Hooks::shutdown->add(\&shutdown); 120 #$BarnOwl::Hooks::mainLoop->add(\&mainloop_hook);111 $BarnOwl::Hooks::mainLoop->add(\&mainloop_hook); 121 112 122 113 ################################################################################ … … 174 165 BarnOwl::admin_message("IRC", "Connected to $alias as $nick"); 175 166 $ircnets{$alias} = $conn; 176 my $fd = $conn->getSocket()->fileno();177 BarnOwl::add_dispatch($fd, \&OwlProcess);178 $conn->{FD} = $fd;179 167 } else { 180 168 die("IRC::Connection->connect failed: $!");
Note: See TracChangeset
for help on using the changeset viewer.