| … | … | ||
|---|---|---|---|
| 240 | my @res; | 240 | my @res; |
| 241 | my $cv = AnyEvent->condvar (cb => sub { | 241 | my $cv = AnyEvent->condvar (cb => sub { |
| 242 | $cb->( | 242 | $cb->( |
| 243 | map $_->[2], | 243 | map $_->[2], |
| 244 | sort { | 244 | sort { |
| 245 | $AnyEvent::PROTOCOL{$a->[1]} <=> $AnyEvent::PROTOCOL{$b->[1]} | 245 | $AnyEvent::PROTOCOL{$b->[1]} <=> $AnyEvent::PROTOCOL{$a->[1]} |
| 246 | or $a->[0] <=> $b->[0] | 246 | or $a->[0] <=> $b->[0] |
| 247 | } | 247 | } |
| 248 | @res | 248 | @res |
| 249 | ) | 249 | ) |
| 250 | }); | 250 | }); |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |