Mercurial > hg > reproctool-df

changeset 12:6d5296efb9ef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Shows user-errors to output, not dying
author Dominic Cleal <dominic@computerkb.co.uk>
date Sun, 25 Jan 2009 13:36:31 +0000
parents f749981ad862
children 135adaf0eed2
files reproctool.cgi
diffstat 1 files changed, 19 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/reproctool.cgi	Sun Jan 25 13:33:20 2009 +0000
+++ b/reproctool.cgi	Sun Jan 25 13:36:31 2009 +0000
@@ -14,19 +14,29 @@
                    -pragma  => 'no-cache',
                    -expires => '-365d');
 
+sub user_error
+{
+    my $text = shift;
+    print<<END;
+<html><head><title>Error</title></head>
+<body><font colour="#FF0000"><b>Error:</b></font> $text</body></html>
+END
+    exit;
+}
+
 # Inputs
-my $str_items = $cgi->param('items') or die('Items missing');
+my $str_items = $cgi->param('items') or user_error('Items missing');
 my $cols = $cgi->param('cols') || 4;
 
 # Load mineral prices
-my $trit = $cgi->param('trit') || die('No trit price');
-my $pyer = $cgi->param('pyer') || die('No pyer price');
-my $mexa = $cgi->param('mexa') || die('No mexa price');
-my $isog = $cgi->param('isog') || die('No isog price');
-my $nocx = $cgi->param('nocx') || die('No nocx price');
-my $zydr = $cgi->param('zydr') || die('No zydr price');
-my $mega = $cgi->param('mega') || die('No mega price');
-my $morp = $cgi->param('morp') || die('No morp price');
+my $trit = $cgi->param('trit') || user_error('No trit price');
+my $pyer = $cgi->param('pyer') || user_error('No pyer price');
+my $mexa = $cgi->param('mexa') || user_error('No mexa price');
+my $isog = $cgi->param('isog') || user_error('No isog price');
+my $nocx = $cgi->param('nocx') || user_error('No nocx price');
+my $zydr = $cgi->param('zydr') || user_error('No zydr price');
+my $mega = $cgi->param('mega') || user_error('No mega price');
+my $morp = $cgi->param('morp') || user_error('No morp price');
 
 our @dbparams;
 require './dbparams.cgi';