diff --git a/plugins/Bitflu/10_AdminHTTP.pm b/plugins/Bitflu/10_AdminHTTP.pm index 0cd0bb9a9..baaccbeaa 100644 --- a/plugins/Bitflu/10_AdminHTTP.pm +++ b/plugins/Bitflu/10_AdminHTTP.pm @@ -757,8 +757,8 @@ sub _JSON_TorrentList { my($self) = @_; my $qlist = $self->{super}->Queue->GetQueueList; my @list = (); - foreach my $dl_type (sort(keys(%$qlist))) { - foreach my $key (sort(keys(%{$qlist->{$dl_type}}))) { + foreach my $dl_type (sort {$a cmp $b} keys(%$qlist) ) { + foreach my $key (sort { $qlist->{$dl_type}{$a}{name} cmp $qlist->{$dl_type}{$b}{name} } keys(%{$qlist->{$dl_type}}) ) { push(@list, $self->_JSON_InfoTorrent($key)); } }