# HG changeset patch # User Dominic Cleal # Date 1230421555 0 # Node ID 9ed1e53a8d3ea33226d886e778704c763c109270 # Parent d5872370102ab4d616c70e6164ee21525446a194 Safety checks in hash sort diff -r d5872370102a -r 9ed1e53a8d3e skillbot.pl --- a/skillbot.pl Thu Dec 25 19:14:23 2008 +0000 +++ b/skillbot.pl Sat Dec 27 23:45:55 2008 +0000 @@ -231,7 +231,9 @@ my @filtered = sort { - $a->{skill}->finish_time <=> $b->{skill}->finish_time + (defined $a->{skill} && defined $b->{skill}) + ? $a->{skill}->finish_time <=> $b->{skill}->finish_time + : 0 } grep { ((defined $2 && (lc($_->{char}->name) eq lc($2)