From: Wolfgang Bangerth Date: Fri, 8 Feb 2002 17:22:19 +0000 (+0000) Subject: Only write up to 8 months per row. X-Git-Tag: v8.0.0~18358 X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a68dd5b6813722e38c1f3a47f631e3ce7ef7ff90;p=dealii.git Only write up to 8 months per row. git-svn-id: https://svn.dealii.org/trunk@5483 0785d39b-7218-0410-832d-ea1e28bc413d --- diff --git a/deal.II/common/scripts/report.pl b/deal.II/common/scripts/report.pl index e942d516f7..d46b0183da 100644 --- a/deal.II/common/scripts/report.pl +++ b/deal.II/common/scripts/report.pl @@ -113,6 +113,7 @@ EOT # finally output a table of results +$number_of_present_month = 0; foreach $date (sort {$b cmp $a} keys %results) { # if the month has changed (or if this is the first month we deal @@ -126,6 +127,8 @@ foreach $date (sort {$b cmp $a} keys %results) $this_year = $1; $this_month = $2; if ($this_month != $old_month) { + $number_of_present_month++; + if (defined $old_month) { print TABLE_FILE "\n"; print TABLE_FILE "\n\n"; @@ -159,7 +162,15 @@ EOT } print TABLE_FILE "\n"; - + + # only write up to 8 months in a row into the month + # listing. if more, insert a linebreak + if (($number_of_present_month % 8 == 0) && + ($number_of_present_month != 0)) + { + print HEAD_FILE "
\n"; + } + # now write link to month file print HEAD_FILE ""; print HEAD_FILE "$this_year/$this_month  \n"; }