forward port of colins 6.8.4 bugwork
This commit is contained in:
parent
8d8c6d8065
commit
21188e7949
4 changed files with 38 additions and 9 deletions
|
|
@ -353,7 +353,7 @@ sub view {
|
|||
my $firstDayInFirstWeek = WebGUI::DateTime::getFirstDayInMonthPosition($thisMonth);
|
||||
my $daysInMonth = WebGUI::DateTime::getDaysInMonth($thisMonth);
|
||||
my @prepad;
|
||||
while ($dayOfWeekCounter < $firstDayInFirstWeek) {
|
||||
while (($dayOfWeekCounter <= $firstDayInFirstWeek) and $firstDayInFirstWeek != 7) {
|
||||
push(@prepad,{
|
||||
count => $dayOfWeekCounter
|
||||
});
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue