root/lang/perl/NanoA/trunk/app/system/app_list.mt @ 23715

Revision 23715, 373 bytes (checked in by kazuho, 5 years ago)

add style

Line 
1<%=r $app->render('system/header') %>
2<h2>Installed Applications</h2>
3Thank you for installing NanoA.  Following applications are currently available.
4<ul>
5% foreach my $dir (<app/*/start.*>) {
6%   next if $dir =~ /~$/;
7%   $dir =~ s|app/(.*)/[^/]+$|$1|;
8<li><a href="<%= $app->nanoa_uri . "/$dir/" %>"><%= $dir %></a></li>
9% }
10</ul>
11<%=r $app->render('system/footer') %>
12
Note: See TracBrowser for help on using the browser.