Mercurial > hg > skillbot

comparison skillbot.pl @ 22:119c2b763dd2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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