-
? for (0 .. @windows - 1) {
? my $window = $windows[$_];
? my @classes = ();
? if (@windows > 1) {
? push @classes, "active" if $_ == 1;
? push @classes, "leftof_active" if $_ == 0;
? }
? else {
? push @classes, "active" if $_ == 0;
? }
?= $_mt->render_file('tab.html', $_[0], $window, @classes)
? }
? for (0 .. @windows - 1) {
? my $window = $windows[$_];
? my @classes;
? if (@windows > 1) {
? push @classes, "active" if $_ == 1;
? push @classes, "leftof_active" if $_ == 0;
? }
? else {
? push @classes, "active" if $_ == 0;
? }
? my $active = grep {$_ eq "active"} @classes;
?= $_mt->render_file('window.html', $_[0], $window, @classes);
? }