navigate.html.tmpl

bugzilla的安装文件

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

Template::Document->new({
    METADATA => {
        'modtime' => '1079646678',
        'name' => 'bug/navigate.html.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";
    #line 23 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $context->process('global/variables.none.tmpl');
    $output .=  "\n";
    #line 63 "template\en\default\bug\navigate.html.tmpl"
    if ($stash->get('bug_list') && $stash->get(['bug_list', 0, 'size', 0]) > 0) {
    #line 26 "template\en\default\bug\navigate.html.tmpl"
    $stash->set('this_bug_idx', $stash->get(['lsearch', [ $stash->get('bug_list'), $stash->get(['bug', 0, 'bug_id', 0]) ]]));
    
    $output .=  "\n  <b>";
    #line 27 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['terms', 0, 'Bug', 0]);
    $output .=  " List:</b>";
    #line 32 "template\en\default\bug\navigate.html.tmpl"
    if ($stash->get('this_bug_idx') ne -1) {
    $output .=  "\n    (";
    #line 30 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get('this_bug_idx') + 1;
    $output .=  " of ";
    #line 30 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['bug_list', 0, 'size', 0]);
    $output .=  ")";
    }
    
    $output .=  "\n\n  <a href=\"show_bug.cgi?id=";
    #line 34 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['bug_list', 0, 'first', 0]);
    $output .=  "\">First</a>\n  <a href=\"show_bug.cgi?id=";
    #line 35 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['bug_list', 0, 'last', 0]);
    $output .=  "\">Last</a>\n";
    #line 59 "template\en\default\bug\navigate.html.tmpl"
    if ($stash->get(['bug', 0, 'bug_id', 0])) {
    #line 56 "template\en\default\bug\navigate.html.tmpl"
    if ($stash->get('this_bug_idx') ne -1) {
    #line 44 "template\en\default\bug\navigate.html.tmpl"
    if ($stash->get('this_bug_idx') > 0) {
    #line 38 "template\en\default\bug\navigate.html.tmpl"
    $stash->set('prev_bug', $stash->get('this_bug_idx') - 1);
    
    $output .=  "\n        <a href=\"show_bug.cgi?id=";
    #line 39 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['bug_list', 0, $stash->get('prev_bug'), 0]);
    $output .=  "\">Prev</a>";
    }
    else {
    $output .=  "\n        <i><font color=\"#777777\">Prev</font></i>";
    }
    
    $output .=  "\n";
    #line 53 "template\en\default\bug\navigate.html.tmpl"
    if ($stash->get('this_bug_idx') + 1 < $stash->get(['bug_list', 0, 'size', 0])) {
    #line 47 "template\en\default\bug\navigate.html.tmpl"
    $stash->set('next_bug', $stash->get('this_bug_idx') + 1);
    
    $output .=  "\n        <a href=\"show_bug.cgi?id=";
    #line 48 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['bug_list', 0, $stash->get('next_bug'), 0]);
    $output .=  "\">Next</a>";
    }
    else {
    $output .=  "\n        <i><font color=\"#777777\">Next</font></i>";
    }
    
    }
    else {
    $output .=  "\n      (This ";
    #line 54 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['terms', 0, 'bug', 0]);
    $output .=  " is not in your list)";
    }
    
    }
    else {
    $output .=  "\n    &nbsp;&nbsp;";
    }
    
    $output .=  "\n\n  &nbsp;&nbsp;<a href=\"buglist.cgi?regetlastlist=1\">Show list</a>";
    }
    
    $output .=  "\n\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=\"query.cgi\">Search page</a>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=\"enter_bug.cgi\">Enter new ";
    #line 66 "template\en\default\bug\navigate.html.tmpl"
    $output .=  $stash->get(['terms', 0, 'bug', 0]);
    $output .=  "</a>\n";
        } };
        if ($@) {
            $error = $context->catch($@, \$output);
            die $error unless $error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {

    },
});