sudo.txt.tmpl

来自「buzilla软件」· TMPL 代码 · 共 86 行

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

Template::Document->new({
    METADATA => {
        'modtime' => '1184629886',
        'name' => 'email/sudo.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";
    #line 22 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $context->process('global/variables.none.tmpl');
    $output .=  "\n\nContent-Type: text/plain\nFrom: ";
    #line 25 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['Param', [ 'mailfrom' ]]);
    $output .=  "\nTo: ";
    #line 26 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['user', 0, 'email', 0]);
    $output .=  "\nSubject: [";
    #line 27 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['terms', 0, 'Bugzilla', 0]);
    $output .=  "] Your account ";
    #line 27 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['user', 0, 'login', 0]);
    $output .=  " is being impersonated\nX-Bugzilla-Type: admin\n\n    ";
    #line 31 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['sudoer', 0, 'identity', 0]);
    $output .=  " has used the 'sudo' feature to access \n";
    #line 32 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['terms', 0, 'Bugzilla', 0]);
    $output .=  " using your account.\n";
    #line 40 "template\en\default\email\sudo.txt.tmpl"
    if ($stash->get('reason')) {
    $output .=  "\n    ";
    #line 35 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['sudoer', 0, 'identity', 0]);
    $output .=  " provided the following reason for doing this:\n";
    #line 37 "template\en\default\email\sudo.txt.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('wrap_comment')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('reason');
        
        &$_tt_filter($output);
    };
    
    }
    else {
    $output .=  "\n    ";
    #line 39 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['sudoer', 0, 'identity', 0]);
    $output .=  " did not provide a reason for doing this.";
    }
    
    $output .=  "\n\n    If you feel that this action was inappropriate, please contact \n";
    #line 43 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['Param', [ 'maintainer' ]]);
    $output .=  ".  For more information on this feature, \nvisit <";
    #line 44 "template\en\default\email\sudo.txt.tmpl"
    $output .=  $stash->get(['Param', [ 'urlbase' ]]);
    $output .=  "page.cgi?id=sudo.html>.\n";
        } };
        if ($@) {
            $_tt_error = $context->catch($@, \$output);
            die $_tt_error unless $_tt_error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {

    },
});