change-old.txt.tmpl

buzilla软件

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

Template::Document->new({
    METADATA => {
        'modtime' => '1166185802',
        '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 $_tt_error;
        
        eval { BLOCK: {
    $output .=  "\n";
    $output .=  "\n";
    $output .=  "\n";
    #line 27 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $context->process('global/variables.none.tmpl');
    $output .=  "\n";
    #line 29 "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: ";
    #line 30 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['Param', [ 'mailfrom' ]]);
    $output .=  "\nTo: ";
    #line 31 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('emailaddress');
    $output .=  "\nSubject: ";
    #line 32 "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\nX-Bugzilla-Type: admin\n\n";
    #line 38 "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 39 "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 44 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['Param', [ 'urlbase' ]]);
    $output .=  "token.cgi?t=";
    #line 44 "template\en\default\account\email\change-old.txt.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('url_quote')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('token');
        
        &$_tt_filter($output);
    };
    
    $output .=  "&a=cxlem\n\nIf you do nothing, and ";
    #line 46 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('newemailaddress');
    $output .=  " confirms this request,\nthe change will be made permanent after ";
    #line 47 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get('max_token_age');
    $output .=  " days\n(on ";
    #line 48 "template\en\default\account\email\change-old.txt.tmpl"
    $output .=  $stash->get(['time2str', [ '%B %o, %Y at %H:%M %Z', $stash->get('expiration_ts') ]]);
    $output .=  ").\n";
        } };
        if ($@) {
            $_tt_error = $context->catch($@, \$output);
            die $_tt_error unless $_tt_error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {

    },
});