Show resume_compose.html syntax highlighted
% # vim: set syntax=mason:
<%args>
$folder => 'none'
$uid => -1
$uidv => -1
$sorted_offset => 1
$sortby => 'date'
$literal => 0
$printable => 0
$full_headers => 0
$n => 0
$msg => ''
</%args>
<%init>
my $user = Apache2::SiteControl->getCurrentUser($r);
my $prefs = new AlphaMail::Preferences($user->getUsername(),
$user->getAttribute('mx'), $config);
my $c;
my $parser;
my $message;
eval {
$msg = new AlphaMail::Message($user, $config);
$msg->resume_draft($user, $config, $folder, $uid, $uidv);
$msg->save();
};
if($@) {
$logger->error("Unable to properly resume composition: $@");
$message = "Unable to get old message";
}
</%init>
<%once>
our $logger = Log::Log4perl->get_logger('alphamail');
our $base = $config->get('base_uri');
</%once>
<& /mail/compose.html &>
See more files for this project here