summaryrefslogtreecommitdiffstats
path: root/CGI.pl
diff options
context:
space:
mode:
authorgerv%gerv.net <>2002-10-03 16:04:02 +0200
committergerv%gerv.net <>2002-10-03 16:04:02 +0200
commitca842229d2d58c85517a8fc8e5a2bc9414752dae (patch)
treeec8cc68d9533b6ca5744a2852c31a57ccae16819 /CGI.pl
parent7b1731d5ceeb67012942d872ab8d9ebb048b04c1 (diff)
downloadbugzilla-ca842229d2d58c85517a8fc8e5a2bc9414752dae.tar.gz
bugzilla-ca842229d2d58c85517a8fc8e5a2bc9414752dae.tar.xz
Bug 155389 - More <link> elements & templatization of navigation_links. Patch by gerv; r=bbaetz.
Diffstat (limited to 'CGI.pl')
-rw-r--r--CGI.pl43
1 files changed, 0 insertions, 43 deletions
diff --git a/CGI.pl b/CGI.pl
index 1e534b384..6e121b273 100644
--- a/CGI.pl
+++ b/CGI.pl
@@ -308,49 +308,6 @@ sub ValidateComment {
}
}
-# Adds <link> elements for bug lists. These can be inserted into the header by
-# using the "header_html" parameter to PutHeader, which inserts an arbitrary
-# string into the header. This function is currently used only in
-# template/en/default/bug/edit.html.tmpl.
-sub navigation_links($) {
- my ($buglist) = @_;
-
- my $retval = "";
-
- # We need to be able to pass in a buglist because when you sort on a column
- # the bugs in the cookie you are given will still be in the old order.
- # If a buglist isn't passed, we just use the cookie.
- $buglist ||= $::COOKIE{"BUGLIST"};
-
- if (defined $buglist && $buglist ne "") {
- my @bugs = split(/:/, $buglist);
-
- if (defined $::FORM{'id'}) {
- # We are on an individual bug
- my $cur = lsearch(\@bugs, $::FORM{"id"});
-
- if ($cur > 0) {
- $retval .= "<link rel=\"First\" href=\"show_bug.cgi?id=$bugs[0]\">\n";
- $retval .= "<link rel=\"Prev\" href=\"show_bug.cgi?id=$bugs[$cur - 1]\">\n";
- }
- if ($cur < $#bugs) {
- $retval .= "<link rel=\"Next\" href=\"show_bug.cgi?id=$bugs[$cur + 1]\">\n";
- $retval .= "<link rel=\"Last\" href=\"show_bug.cgi?id=$bugs[$#bugs]\">\n";
- }
-
- $retval .= "<link rel=\"Up\" href=\"buglist.cgi?regetlastlist=1\">\n";
- $retval .= "<link rel=\"Contents\" href=\"buglist.cgi?regetlastlist=1\">\n";
- } else {
- # We are on a bug list
- $retval .= "<link rel=\"First\" href=\"show_bug.cgi?id=$bugs[0]\">\n";
- $retval .= "<link rel=\"Next\" href=\"show_bug.cgi?id=$bugs[0]\">\n";
- $retval .= "<link rel=\"Last\" href=\"show_bug.cgi?id=$bugs[$#bugs]\">\n";
- }
- }
-
- return $retval;
-}
-
$::CheckOptionValues = 1;
# This sub is still used in reports.cgi.