Mercurial > hg > skillbot
comparison skillbot.pl @ 22:119c2b763dd2
small textual change, and my first hg commit --- i hate you dom
author | user@eee-df |
---|---|
date | Sun, 07 Dec 2008 00:15:29 +0100 |
parents | 631123cc735c |
children | db2e2a751dd6 |
comparison
equal
deleted
inserted
replaced
20:631123cc735c | 22:119c2b763dd2 |
---|---|
124 Timers to set going when we start. | 124 Timers to set going when we start. |
125 | 125 |
126 =cut | 126 =cut |
127 sub init_timers | 127 sub init_timers |
128 { | 128 { |
129 # Join channels fort eh first time, ~15 secs after connect | 129 # Join channels for the first time, ~15 secs after connect |
130 add_one_shot_timer(15, sub { my ($timer, $self) = @_; join_channels($self); }); | 130 add_one_shot_timer(15, sub { my ($timer, $self) = @_; join_channels($self); }); |
131 | 131 |
132 # Check we are in the right channels every 10 minutes | 132 # Check we are in the right channels every 10 minutes |
133 add_repeat_timer(600, sub { my ($timer, $self) = @_; join_channels($self); }); | 133 add_repeat_timer(600, sub { my ($timer, $self) = @_; join_channels($self); }); |
134 | 134 |
379 $nick, $uid, $loaded); | 379 $nick, $uid, $loaded); |
380 } | 380 } |
381 } | 381 } |
382 } | 382 } |
383 | 383 |
384 close(FF) or warn "Something weird when closing friends_file: $!"; | 384 close(FF) or warn "Something weird occured when closing friends_file: $!"; |
385 } | 385 } |
386 | 386 |
387 =pod | 387 =pod |
388 | 388 |
389 Check for any characters that aren't known to be training, then call the API | 389 Check for any characters that aren't known to be training, then call the API |