File: pkgindex.tmpl

package info (click to toggle)
debbugs 2.6.4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,800 kB
  • sloc: perl: 19,270; makefile: 81; sh: 75
file content (32 lines) | stat: -rw-r--r-- 1,274 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
{include(q(html/pre_title))}{html_escape($config{project})} {html_escape($config{bug})} report logs by {html_escape($tag)}{include(q(html/post_title.tmpl))}
</head>
<body>
<h1>{html_escape($config{project})} {html_escape($config{bug})} report logs by {html_escape($tag)}</h1> 
{$note}
<form>
<input type="hidden" name="skip" value="{html_escape($param{skip})}">
<input type="hidden" name="max_results" value="{html_escape($param{max_results})}">
<input type="hidden" name="indexon" value="{html_escape($param{indexon})}">
<input type="hidden" name="repeatmerged" value="{html_escape($param{repeatmerged})}">
<input type="hidden" name="archive" value="{html_escape($param{archive})}">
<input type="hidden" name="sortby" value="{html_escape($param{sortby})}">
{ my $output = '';
if (defined $param{first}) {
    $output .= qq(<input type="hidden" name="first" value=").html_escape($param{first}).qq(">\n);
} else {
    $output .= q(<p>);
     if ($param{skip}> 0) {
	 $output .= q(<input type="submit" name="prev" value="Prev">);
     }
     if (keys %count > ($param{skip} + $param{max_results})) {
	  $output .= q(<input type="submit" name="next" value="Next">);
     }
     $output .= qq(</p>\n);
}
$output;
}
{ $result }
<hr/>
{include(q(html/html_tail))}
</body>
</html>