- # Building month pages
- foreach my $month (qw{01 02 03 04 05 06 07 08 09 10 11 12}) {
- my $page = calendarlink($year, $month);
- my $pagefile = newpagefile($page, $config{default_pageext});
- add_autofile(
- $pagefile, "calendar",
- sub {return autocreate($page, $pagefile, $year, $month);}
- );
- }
-
- # Filling potential gaps in years (e.g. calendar goes from 2010 to 2014,
- # and we just added year 2005. We have to had years 2006 to 2009.
- if (not exists $wikistate{calendar}{minyear}) {
- $wikistate{calendar}{minyear} = $year;
- } elsif ($wikistate{calendar}{minyear} > $year) {
- gencalendaryear($year + 1);
- $wikistate{calendar}{minyear} -= 1;
- }
- if (not exists $wikistate{calendar}{maxyear}) {
- $wikistate{calendar}{maxyear} = $year;
+ # Filling potential gaps in years (e.g. calendar goes from 2010 to 2014,
+ # and we just added year 2005. We have to had years 2006 to 2009).
+ return if $params{norecurse};
+ if (not exists $wikistate{calendar}{minyear}) {
+ $wikistate{calendar}{minyear} = $year;
+ } elsif ($wikistate{calendar}{minyear} > $year) {
+ foreach my $other ($year + 1 .. $wikistate{calendar}{minyear} - 1) {
+ gencalendaryear($other, norecurse => 1);