summaryrefslogtreecommitdiffstats
path: root/CGI.pl
diff options
context:
space:
mode:
Diffstat (limited to 'CGI.pl')
-rw-r--r--CGI.pl21
1 files changed, 9 insertions, 12 deletions
diff --git a/CGI.pl b/CGI.pl
index 373572986..e70fd3f87 100644
--- a/CGI.pl
+++ b/CGI.pl
@@ -799,6 +799,15 @@ sub PutFooter {
}
+sub PuntTryAgain ($) {
+ my ($str) = (@_);
+ print PerformSubsts(Param("errorhtml"),
+ {errormsg => $str});
+ PutFooter();
+ exit;
+}
+
+
sub CheckIfVotedConfirmed {
my ($id, $who) = (@_);
SendSQL("SELECT bugs.votes, bugs.bug_status, products.votestoconfirm, " .
@@ -878,18 +887,6 @@ sub DumpBugActivity {
}
-#
-# Prints a warnbanner incl. image with given message
-#
-sub warnBanner( $ )
-{
- my ($msg) = (@_);
- print Param("warnbannerhtml");
- print $msg;
- print Param("warnfooterhtml");
-}
-
-
sub GetCommandMenu {
my $loggedin = quietly_check_login();
my $html = qq{<FORM METHOD=GET ACTION="show_bug.cgi">};