% my $sort_param = begin % my $param = shift;
<%= ucfirst l 'nr' %> | %= $sort_param->('status'); %= $sort_param->('date'); % if ($folder ne "SENT") { %= $sort_param->('sender'); % } else {<%= ucfirst l 'recipient' %> % if (param('sort') eq "sender") { % } elsif (param('sort') eq "recipient_rev") { % } | % } %= $sort_param->('subject'); %= $sort_param->('size');|||||
---|---|---|---|---|---|---|
%= $msgnum | %= ucfirst($msg->{is_multipart} ? l('yes') : l('no')); | % my $date = parse_iso_date $msg->{date}; %= join('/', $date->{mday}, $date->{month}, $date->{year}) . " $date->{hour}:$date->{min}"; | %= $msg->{from}->[0]->{name} || $msg->{from}->[0]->{email}; | <%= $msg->{subject} || '_' %> | %= print_sizes10 $msg->{size}; |