- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
rf094fc4 r167044b 117 117 BarnOwl::new_command('irc-who' => \&cmd_who); 118 118 BarnOwl::new_command('irc-stats' => \&cmd_stats); 119 } 120 121 $BarnOwl::Hooks::startup->add(\&startup); 122 $BarnOwl::Hooks::s hutdown->add(\&shutdown);123 #$BarnOwl::Hooks::mainLoop->add(\&mainloop_hook);119 BarnOwl::new_command('irc-topic' => \&cmd_topic); 120 } 121 122 $BarnOwl::Hooks::startup->add('BarnOwl::Module::IRC::startup'); 123 $BarnOwl::Hooks::shutdown->add('BarnOwl::Module::IRC::shutdown'); 124 124 125 125 ################################################################################ … … 262 262 my $conn = get_connection(\@_); 263 263 my $chan = get_channel(\@_) || die("Usage: $cmd <channel>\n"); 264 $conn->names_tmp([]); 264 265 $conn->conn->names($chan); 265 266 } … … 299 300 my $type = shift || die("Usage: $cmd <chiklmouy> [server] \n"); 300 301 $conn->conn->stats($type, @_); 302 } 303 304 sub cmd_topic { 305 my $cmd = shift; 306 my $conn = get_connection(\@_); 307 $conn->conn->topic(@_); 301 308 } 302 309
Note: See TracChangeset
for help on using the changeset viewer.