Subversion Repositories VORC

Rev

Rev 258 | Rev 260 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 258 Rev 259
Line 672... Line 672...
672
                    [$h->div ( { class=>'rTableCellr', style=>"white-space:nowrap;padding:0px 5px;font-size:small;", onClick => $onclick },
672
                    [$h->div ( { class=>'rTableCellr', style=>"white-space:nowrap;padding:0px 5px;font-size:small;", onClick => $onclick },
673
                       substr($s->{dayofweek}, 0, 3)." [".$s->{date} =~ s/^\d{4}-(0)?//r =~ s|-(0)?|/|r."]",
673
                       substr($s->{dayofweek}, 0, 3)." [".$s->{date} =~ s/^\d{4}-(0)?//r =~ s|-(0)?|/|r."]",
674
                       $s->{time}.$h->br.
674
                       $s->{time}.$h->br.
675
                       ($s->{volhours} ? $s->{volhours}." hrs" : ' '),
675
                       ($s->{volhours} ? $s->{volhours}." hrs" : ' '),
676
                       $s->{location},
676
                       $s->{location},
677
                       ($s->{dept} eq "CLA" ? "MVP Class" : $s->{dept} eq "SEM" ? "Seminar" : getDepartments()->{$s->{dept}}) .$h->br.
677
                       ($s->{dept} eq "CLA" ? "MVP Class" : $s->{dept} eq "SEM" ? "Seminar" : getDepartments()->{$s->{dept}}." - ".$s->{role}) .$h->br.
678
                       ($s->{teams} ? $s->{role}.": ".$s->{teams} : $s->{role}),
678
                       ($s->{dept} =~/(SEM)|(CLA)/ ? $s->{role} : $s->{teams} ? $s->{teams} : undef),
679
                       $s->{buttons})
679
                       $s->{buttons})
680
                     ]
680
                     ]
681
                   );
681
                   );
682
    $hours += $s->{volhours};
682
    $hours += $s->{volhours};
683
  }
683
  }