diff --git a/lib/unix_dog/Controller/Main.pm b/lib/unix_dog/Controller/Main.pm index 7639f9d..b227a72 100644 --- a/lib/unix_dog/Controller/Main.pm +++ b/lib/unix_dog/Controller/Main.pm @@ -104,7 +104,7 @@ sub announcements ($self) { $next_page = $page + 1; } - my @chosen = (sort keys %announcements)[$start_index..$end_index]; + my @chosen = (sort { $b cmp $a } (keys %announcements))[$start_index..$end_index]; my @items; for my $key (@chosen) { push @items, $announcements{$key};