diff options
Diffstat (limited to 'rh-bin')
-rwxr-xr-x | rh-bin/showlist.json | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rh-bin/showlist.json b/rh-bin/showlist.json index 507817d..35d81e3 100755 --- a/rh-bin/showlist.json +++ b/rh-bin/showlist.json @@ -38,7 +38,8 @@ if(defined $ctx) { $status = $shows[1]; $errorstring = $shows[2]; } else { - for my $href (@shows) { + my @sorted = sort { lc($a->{'TITLE'}) cmp lc($b->{'TITLE'}) } @shows; + for my $href (@sorted) { my %show; $show{'id'} = int($href->{'ID'}); $show{'title'} = $href->{'ID'} . " | " . $href->{'TITLE'}; |