comment-guided.txt.tmpl

来自「bugzilla的安装文件」· TMPL 代码 · 共 80 行

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

Template::Document->new({
    METADATA => {
        'modtime' => '1078442522',
        'name' => 'bug/create/comment-guided.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 26 "template\en\default\bug\create\comment-guided.txt.tmpl"
    # USE
    $stash->set('Bugzilla',
                $context->plugin('Bugzilla'));
    $output .=  "\nUser-Agent:       ";
    #line 27 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['Bugzilla', 0, 'cgi', 0, 'user_agent', 0]);
    $output .=  "\nBuild Identifier: ";
    #line 28 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['form', 0, 'buildid', 0]);
    $output .=  "\n\n";
    #line 30 "template\en\default\bug\create\comment-guided.txt.tmpl"
    if ($stash->get(['form', 0, 'comment', 0])) {
    $output .=  $stash->get(['form', 0, 'comment', 0]);
    }
    
    $output .=  "\n\n";
    #line 33 "template\en\default\bug\create\comment-guided.txt.tmpl"
    if ($stash->get(['form', 0, 'reproducible', 0]) ne 'Choose one...') {
    $output .=  "Reproducible: ";
    #line 33 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['form', 0, 'reproducible', 0]);
    }
    
    $output .=  "\n";
    $output .=  "Steps to Reproduce:\n";
    #line 37 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['form', 0, 'reproduce_steps', 0]);
    $output .=  "\n";
    #line 42 "template\en\default\bug\create\comment-guided.txt.tmpl"
    if ($stash->get(['form', 0, 'actual_results', 0])) {
    $output .=  "Actual Results:  \n";
    #line 42 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['form', 0, 'actual_results', 0]);
    }
    
    $output .=  "\n";
    #line 47 "template\en\default\bug\create\comment-guided.txt.tmpl"
    if ($stash->get(['form', 0, 'expected_results', 0])) {
    $output .=  "\nExpected Results:  \n";
    #line 47 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['form', 0, 'expected_results', 0]);
    }
    
    $output .=  "\n\n";
    #line 49 "template\en\default\bug\create\comment-guided.txt.tmpl"
    $output .=  $stash->get(['form', 0, 'additional_info', 0]);
    $output .=  "\n";
        } };
        if ($@) {
            $error = $context->catch($@, \$output);
            die $error unless $error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {

    },
});