Remove remaining calls to idiot/eidiot. Should fix 1479

5 files changed, 5 insertions, 5 deletions

diff --git a/httemplate/edit/process/cust_svc.cgi b/httemplate/edit/process/cust_svc.cgi
index 3a07d1e7a..e9d5f6238 100644
--- a/httemplate/edit/process/cust_svc.cgi
+++ b/httemplate/edit/process/cust_svc.cgi
@@ -21,7 +21,7 @@
 %if ( $error ) {
 %  #$cgi->param('error', $error);
 %  #print $cgi->redirect(popurl(2). "cust_svc.cgi?". $cgi->query_string );
-%  eidiot($error);
+%  errorpage($error);
 %} else { 
 %  my $svcdb = $new->part_svc->svcdb;
 %  print $cgi->redirect(popurl(3). "view/$svcdb.cgi?$svcnum");
diff --git a/httemplate/edit/process/domain_record.cgi b/httemplate/edit/process/domain_record.cgi
index 87bdf6835..daf35ad6d 100755
--- a/httemplate/edit/process/domain_record.cgi
+++ b/httemplate/edit/process/domain_record.cgi
@@ -26,7 +26,7 @@
 
 <!-- mason kludge -->
 %
-%  eidiot($error);
+%  errorpage($error);
 %} else { 
 %  my $svcnum = $new->svcnum;
 %  print $cgi->redirect(popurl(3). "view/svc_domain.cgi?$svcnum");
diff --git a/httemplate/edit/process/reg_code.cgi b/httemplate/edit/process/reg_code.cgi
index 4fdea60fc..d93bb55a2 100644
--- a/httemplate/edit/process/reg_code.cgi
+++ b/httemplate/edit/process/reg_code.cgi
@@ -1,7 +1,7 @@
 %
 %
 %$cgi->param('agentnum') =~ /^(\d+)$/
-%  or eidiot 'illegal agentnum '. $cgi->param('agentnum');
+%  or errorpage('illegal agentnum '. $cgi->param('agentnum'));
 %my $agentnum = $1;
 %my $agent = qsearchs('agent', { 'agentnum' => $agentnum } );
 %
diff --git a/httemplate/edit/rate_region.cgi b/httemplate/edit/rate_region.cgi
index 12cb180de..bd3dcbd46 100644
--- a/httemplate/edit/rate_region.cgi
+++ b/httemplate/edit/rate_region.cgi
@@ -27,7 +27,7 @@
 %if ( @rate_prefix ) {
 %  $countrycode = $rate_prefix[0]->countrycode;
 %  foreach my $rate_prefix ( @rate_prefix ) {
-%    eidiot 'multiple country codes per region not yet supported by web UI'
+%    errorpage('multiple country codes per region not yet supported by web UI')
 %      unless $rate_prefix->countrycode eq $countrycode;
 %  }
 %}
diff --git a/httemplate/edit/reg_code.cgi b/httemplate/edit/reg_code.cgi
index 06bef4879..f5f0f7b66 100644
--- a/httemplate/edit/reg_code.cgi
+++ b/httemplate/edit/reg_code.cgi
@@ -1,6 +1,6 @@
 %
 %my $agentnum = $cgi->param('agentnum');
-%$agentnum =~ /^(\d+)$/ or eidiot "illegal agentnum $agentnum";
+%$agentnum =~ /^(\d+)$/ or errorpage("illegal agentnum $agentnum");
 %$agentnum = $1;
 %my $agent = qsearchs('agent', { 'agentnum' => $agentnum } );
 %