Show index.html syntax highlighted
% # vim:set syntax=mason:
<%args>
$selected => 'Contacts'
$message => ''
</%args>
<& /mail/header.mhtml, message => $message, title => "Address Book" &>
<div class="heading">
Address Book
</div>
<table class="preferences">
<tr class="tabs">
% my $cnt = 0;
% for my $tab (sort { $tabsref->{$a}{sortorder} <=> $tabsref->{$b}{sortorder} } keys %$tabsref) {
% $cnt++;
% if($selected eq $tab) {
<td class="selected">
<% $tab %>
</td>
% } else {
<td class="unselected">
<% hyperlink("/mail/addressbook/index.html", $tab,
{ selected => $tab }, "unselected") %>
</td>
% }
% }
</tr>
<tr class="panel">
<td colspan="<% $cnt %>">
% $selected = 'Contacts' if(!$tabsref->{$selected}{dest});
<& $tabsref->{$selected}{dest}, selected => $selected &>
</td>
</tr>
</table>
<& /mail/footer.mhtml &>
<%once>
use AlphaMail::HTMLHelper qw(hyperlink);
</%once>
<%init>
my $tabsref = {
Contacts => { sortorder => 0,
dest => '/mail/addressbook/edit.mhtml' },
Import => { sortorder => 1,
dest => '/mail/addressbook/import.mhtml' },
};
</%init>
See more files for this project here