# HG changeset patch # User Dominic Cleal # Date 1230050519 0 # Node ID 0f8275723d81b6af730df09ac1b7cb9027b38f74 # Parent 2b9279fb52a5bbb9fc279ef7a8277b161c172054 Update characters on retrieval, remove !update diff -r 2b9279fb52a5 -r 0f8275723d81 skillbot.pl --- a/skillbot.pl Sat Dec 20 12:15:05 2008 +0000 +++ b/skillbot.pl Tue Dec 23 16:41:59 2008 +0000 @@ -232,6 +232,7 @@ if ((defined $2 && (lc($f->{char}->name) eq lc($2) || lc($2) eq 'all' || lc($2) eq '*')) || (!defined $2 && $f->{nick} eq $their_nick)) { + check_friend($self, $f); my $text; if (defined $f->{skill}) { my $downtime = ''; @@ -266,17 +267,11 @@ } } - # force update/reload of the friends/training data - elsif ($msg =~ /^\!update/i) { - update_friends($self); - check_training($self); - $self->privmsg('#' . $config{channel}, "Done"); - } - # lists the chars in order of shortest training time elsif ($msg =~ /^\!next/i) { my $nreply = "Training: "; + check_training($self); my @training = sort { $a->{skill}->finish_time <=> $b->{skill}->finish_time } grep { defined $_->{skill} } @friends;