- # NOTE: sort the pages by days of the month
- my %days = map {($_=>[])} (1 .. $last_day);
- foreach my $page (@pages) {
- my $page_ctime = DateTime->from_epoch
- ( epoch => $IkiWiki::pagectime{$page}
- , time_zone => 'local'
- , locale => $config{locale}
- );
- push @{$days{$page_ctime->day()}}, $page;
+ my %events_by_day = map {($_=>[])} (1 .. $last_day);
+ foreach my $event (events_of_pages(\@pages, %params)) {
+ push @{$events_by_day{$event->{date}->{day}}}, $event;