Mon Oct 8 12:04:51 PDT 2007

Update of /home/cvs/cvsroot/freeside/httemplate/misc
In directory wavetail:/tmp/cvs-serv9413/httemplate/misc

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	bill.cgi cancel-unaudited.cgi cust_main-cancel.cgi 
	delete-agent_payment_gateway.cgi delete-cust_credit.cgi 
	delete-cust_pay.cgi delete-cust_refund.cgi 
	delete-domain_record.cgi delete-part_export.cgi dump.cgi 
	inventory_item-import.html unapply-cust_credit.cgi 
	unapply-cust_pay.cgi unprovision.cgi unsusp_pkg.cgi 
	unvoid-cust_pay_void.cgi upload-batch.cgi void-cust_pay.cgi 
Log Message:
Remove remaining calls to idiot/eidiot.  Should fix 1479

Index: upload-batch.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/upload-batch.cgi,v
retrieving revision 1.11
retrieving revision 1.11.2.1
diff -u -d -r1.11 -r1.11.2.1

--- upload-batch.cgi	5 Feb 2007 15:49:32 -0000	1.11
+++ upload-batch.cgi	8 Oct 2007 19:04:49 -0000	1.11.2.1
@@ -2,7 +2,7 @@
 
     <!-- mason kludge -->
 
-%    eidiot($error);
+%    errorpage($error);
 %#    $cgi->param('error', $error);
 %#    print $cgi->redirect( "${p}cust_main-import.cgi
 %  } else {

Index: dump.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/dump.cgi,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -u -d -r1.3 -r1.3.2.1
--- dump.cgi	23 Aug 2006 22:25:38 -0000	1.3
+++ dump.cgi	8 Oct 2007 19:04:49 -0000	1.3.2.1
@@ -7,7 +7,7 @@
 %    }
 %    open(DUMP,"pg_dump $dbname |");
 %  } else {
-%    eidiot "don't (yet) know how to dump ". driver_name. " databases\n";
+%    errorpage("don't (yet) know how to dump ". driver_name. " databases");
 %  }
 %
 %  http_header('Content-Type' => 'text/plain' );

Index: unvoid-cust_pay_void.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/unvoid-cust_pay_void.cgi,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- unvoid-cust_pay_void.cgi	23 Aug 2006 22:25:38 -0000	1.2
+++ unvoid-cust_pay_void.cgi	8 Oct 2007 19:04:49 -0000	1.2.2.1
@@ -9,7 +9,7 @@
 %my $custnum = $cust_pay_void->custnum;
 %
 %my $error = $cust_pay_void->unvoid;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);
 %

Index: unprovision.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/unprovision.cgi,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -u -d -r1.3 -r1.3.2.1
--- unprovision.cgi	23 Aug 2006 22:25:38 -0000	1.3
+++ unprovision.cgi	8 Oct 2007 19:04:49 -0000	1.3.2.1
@@ -22,7 +22,7 @@
 
 <!-- mason kludge -->
 %
-%  &eidiot($error);
+%  errorpage($error);
 %} else {
 %  print $cgi->redirect(popurl(2)."view/cust_main.cgi?$custnum");
 %}

Index: bill.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/bill.cgi,v
retrieving revision 1.12.2.1
retrieving revision 1.12.2.2
diff -u -d -r1.12.2.1 -r1.12.2.2
--- bill.cgi	13 Jul 2007 23:52:32 -0000	1.12.2.1
+++ bill.cgi	8 Oct 2007 19:04:48 -0000	1.12.2.2
@@ -11,7 +11,6 @@
 %my $error = $cust_main->bill(
 %#                          'time'=>$time
 %                         );
-%#&eidiot($error) if $error;
 %
 %unless ( $error ) {
 %  $error = $cust_main->apply_payments_and_credits
@@ -33,14 +32,13 @@
 %                                  #'realtime' => $conf->exists('realtime-backend'),
 %                                 );
 %}
-%#&eidiot($error) if $error;
 %
 %if ( $error ) {
 %
 
 <!-- mason kludge -->
 %
-%  &idiot($error);
+%  errorpage($error);
 %} else {
 %  print $cgi->redirect(popurl(2). "view/cust_main.cgi?$custnum");
 %}

Index: unapply-cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/unapply-cust_pay.cgi,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -u -d -r1.3 -r1.3.2.1
--- unapply-cust_pay.cgi	23 Aug 2006 22:25:38 -0000	1.3
+++ unapply-cust_pay.cgi	8 Oct 2007 19:04:49 -0000	1.3.2.1
@@ -10,7 +10,7 @@
 %
 %foreach my $cust_bill_pay ( $cust_pay->cust_bill_pay ) {
 %  my $error = $cust_bill_pay->delete;
-%  eidiot($error) if $error;
+%  errorpage($error) if $error;
 %}
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);

Index: void-cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/void-cust_pay.cgi,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- void-cust_pay.cgi	23 Aug 2006 22:25:38 -0000	1.2
+++ void-cust_pay.cgi	8 Oct 2007 19:04:49 -0000	1.2.2.1
@@ -9,7 +9,7 @@
 %my $custnum = $cust_pay->custnum;
 %
 %my $error = $cust_pay->void;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);
 %

Index: delete-cust_credit.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/delete-cust_credit.cgi,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- delete-cust_credit.cgi	23 Aug 2006 22:25:38 -0000	1.2
+++ delete-cust_credit.cgi	8 Oct 2007 19:04:48 -0000	1.2.2.1
@@ -9,7 +9,7 @@
 %my $custnum = $cust_credit->custnum;
 %
 %my $error = $cust_credit->delete;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);
 %

Index: delete-agent_payment_gateway.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/delete-agent_payment_gateway.cgi,v
retrieving revision 1.1
retrieving revision 1.1.2.1
diff -u -d -r1.1 -r1.1.2.1
--- delete-agent_payment_gateway.cgi	14 Nov 2006 04:04:33 -0000	1.1
+++ delete-agent_payment_gateway.cgi	8 Oct 2007 19:04:48 -0000	1.1.2.1
@@ -10,6 +10,6 @@
 % });
 %
 % my $error = $agent_payment_gateway->delete;
-% eidiot($error) if $error;
+% errorpage($error) if $error;
 %
 % print $cgi->redirect($p. "browse/agent.cgi");

Index: unapply-cust_credit.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/unapply-cust_credit.cgi,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- unapply-cust_credit.cgi	23 Aug 2006 22:25:38 -0000	1.2
+++ unapply-cust_credit.cgi	8 Oct 2007 19:04:49 -0000	1.2.2.1
@@ -10,7 +10,7 @@
 %
 %foreach my $cust_credit_bill ( $cust_credit->cust_credit_bill ) {
 %  my $error = $cust_credit_bill->delete;
-%  eidiot($error) if $error;
+%  errorpage($error) if $error;
 %}
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);

Index: cust_main-cancel.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/cust_main-cancel.cgi,v
retrieving revision 1.4
retrieving revision 1.4.2.1
diff -u -d -r1.4 -r1.4.2.1
--- cust_main-cancel.cgi	23 Aug 2006 22:25:38 -0000	1.4
+++ cust_main-cancel.cgi	8 Oct 2007 19:04:48 -0000	1.4.2.1
@@ -14,7 +14,7 @@
 %my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } );
 %
 %my @errors = $cust_main->cancel( 'ban' => $ban );
-%eidiot(join(' / ', @errors)) if scalar(@errors);
+%errorpage(join(' / ', @errors)) if scalar(@errors);
 %
 %#print $cgi->redirect($p. "view/cust_main.cgi?". $cust_main->custnum);
 %print $cgi->redirect($p);

Index: unsusp_pkg.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/unsusp_pkg.cgi,v
retrieving revision 1.5
retrieving revision 1.5.2.1
diff -u -d -r1.5 -r1.5.2.1
--- unsusp_pkg.cgi	23 Aug 2006 22:25:38 -0000	1.5
+++ unsusp_pkg.cgi	8 Oct 2007 19:04:49 -0000	1.5.2.1
@@ -8,7 +8,7 @@
 %my $cust_pkg = qsearchs('cust_pkg',{'pkgnum'=>$pkgnum});
 %
 %my $error = $cust_pkg->unsuspend;
-%&eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect(popurl(2). "view/cust_main.cgi?".$cust_pkg->getfield('custnum'));
 %

Index: cancel-unaudited.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/cancel-unaudited.cgi,v
retrieving revision 1.11
retrieving revision 1.11.2.1
diff -u -d -r1.11 -r1.11.2.1
--- cancel-unaudited.cgi	23 Aug 2006 22:25:38 -0000	1.11
+++ cancel-unaudited.cgi	8 Oct 2007 19:04:48 -0000	1.11.2.1
@@ -14,7 +14,7 @@
 %die "Unknown svcnum!" unless $cust_svc;
 %my $cust_pkg = $cust_svc->cust_pkg;
 %if ( $cust_pkg ) {
-%  &eidiot( 'This account has already been audited.  Cancel the '.
+%  errorpage( 'This account has already been audited.  Cancel the '.
 %           qq!<A HREF="${p}view/cust_main.cgi?!. $cust_pkg->custnum.
 %           '#cust_pkg'. $cust_pkg->pkgnum. '">'.
 %           'package</A> instead.');
@@ -27,7 +27,7 @@
 
 <!-- mason kludge -->
 %
-%  &eidiot($error);
+%  errorpage($error);
 %} else {
 %  print $cgi->redirect(popurl(2));
 %}

Index: delete-cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/delete-cust_pay.cgi,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -u -d -r1.3 -r1.3.2.1
--- delete-cust_pay.cgi	23 Aug 2006 22:25:38 -0000	1.3
+++ delete-cust_pay.cgi	8 Oct 2007 19:04:48 -0000	1.3.2.1
@@ -9,7 +9,7 @@
 %my $custnum = $cust_pay->custnum;
 %
 %my $error = $cust_pay->delete;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);
 %

Index: delete-cust_refund.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/delete-cust_refund.cgi,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -u -d -r1.1.2.1 -r1.1.2.2
--- delete-cust_refund.cgi	28 Feb 2007 19:21:04 -0000	1.1.2.1
+++ delete-cust_refund.cgi	8 Oct 2007 19:04:48 -0000	1.1.2.2
@@ -9,7 +9,7 @@
 %my $custnum = $cust_refund->custnum;
 %
 %my $error = $cust_refund->delete;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "view/cust_main.cgi?". $custnum);
 %

Index: delete-part_export.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/delete-part_export.cgi,v
retrieving revision 1.4
retrieving revision 1.4.2.1
diff -u -d -r1.4 -r1.4.2.1
--- delete-part_export.cgi	23 Aug 2006 22:25:38 -0000	1.4
+++ delete-part_export.cgi	8 Oct 2007 19:04:48 -0000	1.4.2.1
@@ -8,7 +8,7 @@
 %my $part_export = qsearchs('part_export',{'exportnum'=>$exportnum});
 %
 %my $error = $part_export->delete;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "browse/part_export.cgi");
 %

Index: inventory_item-import.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/inventory_item-import.html,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- inventory_item-import.html	23 Aug 2006 22:25:38 -0000	1.2
+++ inventory_item-import.html	8 Oct 2007 19:04:49 -0000	1.2.2.1
@@ -1,7 +1,7 @@
 %
 %
 %my $classnum = $cgi->param('classnum');
-%$classnum =~ /^(\d+)$/ or eidiot "illegal classnum $classnum";
+%$classnum =~ /^(\d+)$/ or errorpage("illegal classnum $classnum");
 %$classnum = $1;
 %my $inventory_class = qsearchs('inventory_class', { 'classnum' => $classnum } );
 %

Index: delete-domain_record.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/delete-domain_record.cgi,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- delete-domain_record.cgi	23 Aug 2006 22:25:38 -0000	1.2
+++ delete-domain_record.cgi	8 Oct 2007 19:04:48 -0000	1.2.2.1
@@ -8,7 +8,7 @@
 %my $domain_record = qsearchs('domain_record',{'recnum'=>$recnum});
 %
 %my $error = $domain_record->delete;
-%eidiot($error) if $error;
+%errorpage($error) if $error;
 %
 %print $cgi->redirect($p. "view/svc_domain.cgi?". $domain_record->svcnum);
 %

