change-old.txt.tmpl

bugzilla的安装文件

#------------------------------------------------------------------------
# Compiled template generated by the Template Toolkit version 2.13
#------------------------------------------------------------------------

Template::Document->new({
    METADATA => {
        'modtime' => '1081322674',
        'name' => 'account/email/change-old.txt.tmpl',
    },
    BLOCK => sub {
        my $context = shift || die "template sub called without context\n";
        my $stash   = $context->stash;
        my $output  = '';
        my $error;
        
        eval { BLOCK: {
    $output .=  "\n";
    $output .=  "\n";
    $output .=  "\n";
    #line 28 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $context->process('global/variables.none.tmpl');
    $output .=  "\n";
    #line 31 "template\en\default\account\email\change-old.txt.tmpl"
    $stash->set('expiration_ts', $stash->get('token_ts') + ($stash->get('max_token_age') * 86400));
    
    $output .=  "\nFrom: bugzilla-admin-daemon\nTo: ";
    #line 33 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('emailaddress');
    $output .=  "\nSubject: ";
    #line 34 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['terms', 0, 'Bugzilla', 0]);
    $output .=  " Change Email Address Request\nImportance: High\nX-MSMail-Priority: High\nX-Priority: 1\n\n";
    #line 39 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['terms', 0, 'Bugzilla', 0]);
    $output .=  " has received a request to change the email address\nfor your account to ";
    #line 40 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('newemailaddress');
    $output .=  ".\n\nIf you are not the person who made this request, or you wish to cancel\nthis request, visit the following link:\n\n";
    #line 45 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['Param', [ 'urlbase' ]]);
    $output .=  "token.cgi?t=";
    #line 45 "template\en\default\account\email\change-old.txt.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('url_quote')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('token');
        
        &$filter($output);
    };
    
    $output .=  "&a=cxlem\n\nIf you do nothing, and ";
    #line 47 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('newemailaddress');
    $output .=  " confirms this request, the\nchange will be made permanent after ";
    #line 48 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('max_token_age');
    $output .=  " days (at precisely \n";
    #line 49 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['time2str', [ '%H:%M on the %o of %B, %Y', $stash->get('expiration_ts') ]]);
    $output .=  ").\n";
        } };
        if ($@) {
            $error = $context->catch($@, \$output);
            die $error unless $error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {

    },
});