<% foreach my $pl ( sort keys %{$parking_lot} ) { %> <%= &subs::format_name($pl) %> <% } %>

<% my $query; if ($menu eq 'run') { $query = &subs::db_query('select * from appointments where (type=? or type=?) and timestamp <= ? order by timestamp desc', 'start','record', &subs::rightNow())->hashes } else { $query = &subs::db_query('select * from appointments where timestamp >= ? order by timestamp asc limit 10', &subs::rightNow())->hashes } %> <% foreach my $app ( @{$query} ) { %> <% my @title = split '', &subs::format_name($app->{'app'}); %> <% } %>

	App	Time
<%== &subs::main_icon_maker({ app => $app->{'app'}, timestamp => &subs::rightNow(), size => 'little' }) %>	<% foreach my $t ( @title ) { %> <% my $style; %> <% if ($t eq ' ') { $t = 'blank'; $style= "opacity:0;" } elsif ($t eq '.') { $t = 'dot'; } else { } %> <% if ($t =~ /[A-Z]/) { %> <% } else { %> <% } %> <% } %>