diff options
author | ivan <ivan> | 2001-10-30 14:54:07 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-10-30 14:54:07 +0000 |
commit | c14a267229fc0d6f2d2afdebab3bd34d825df2ef (patch) | |
tree | a9f908e34d0f6664decae78e4c30f41b2c80ece4 /httemplate/misc | |
parent | 160db3d20070241532162f8fa257e2ae4dd1f611 (diff) |
get rid of header foo in individual templates
Diffstat (limited to 'httemplate/misc')
-rwxr-xr-x | httemplate/misc/catchall.cgi | 4 | ||||
-rwxr-xr-x | httemplate/misc/delete-customer.cgi | 4 | ||||
-rwxr-xr-x | httemplate/misc/link.cgi | 4 |
3 files changed, 6 insertions, 6 deletions
diff --git a/httemplate/misc/catchall.cgi b/httemplate/misc/catchall.cgi index 7e90ac4e0..3aafd0d49 100755 --- a/httemplate/misc/catchall.cgi +++ b/httemplate/misc/catchall.cgi @@ -1,5 +1,5 @@ <% -#<!-- $Id: catchall.cgi,v 1.3 2001-10-26 10:24:56 ivan Exp $ --> +#<!-- $Id: catchall.cgi,v 1.4 2001-10-30 14:54:07 ivan Exp $ --> use strict; use vars qw( $conf $cgi $action $svcnum $svc_domain $pkgnum $svcpart @@ -94,7 +94,7 @@ if ($pkgnum) { $email{0} = "(none)"; $p1 = popurl(1); -print $cgi->header( @FS::CGI::header ), header("Domain Catchall Edit", ''); +print header("Domain Catchall Edit", ''); print qq!<FONT SIZE="+1" COLOR="#ff0000">Error: !, $cgi->param('error'), "</FONT>" diff --git a/httemplate/misc/delete-customer.cgi b/httemplate/misc/delete-customer.cgi index ec1f734f1..d3e7c798f 100755 --- a/httemplate/misc/delete-customer.cgi +++ b/httemplate/misc/delete-customer.cgi @@ -1,5 +1,5 @@ <% -#<!-- $Id: delete-customer.cgi,v 1.4 2001-10-26 10:24:56 ivan Exp $ --> +#<!-- $Id: delete-customer.cgi,v 1.5 2001-10-30 14:54:07 ivan Exp $ --> use strict; use vars qw( $cgi $conf $query $custnum $new_custnum $cust_main ); @@ -28,7 +28,7 @@ if ( $cgi->param('error') ) { $cust_main = qsearchs( 'cust_main', { 'custnum' => $custnum } ) or die "Customer not found: $custnum"; -print $cgi->header ( @FS::CGI::header ), header('Delete customer'); +print header('Delete customer'); print qq!<FONT SIZE="+1" COLOR="#ff0000">Error: !, $cgi->param('error'), "</FONT>" diff --git a/httemplate/misc/link.cgi b/httemplate/misc/link.cgi index cd873cc8d..801b92006 100755 --- a/httemplate/misc/link.cgi +++ b/httemplate/misc/link.cgi @@ -1,5 +1,5 @@ <% -#<!-- $Id: link.cgi,v 1.3 2001-10-26 10:24:56 ivan Exp $ --> +#<!-- $Id: link.cgi,v 1.4 2001-10-30 14:54:07 ivan Exp $ --> use strict; use vars qw ( %link_field $cgi $pkgnum $svcpart $query $part_svc $svc $svcdb @@ -32,7 +32,7 @@ $svc = $part_svc->getfield('svc'); $svcdb = $part_svc->getfield('svcdb'); $link_field = $link_field{$svcdb}; -print $cgi->header( @FS::CGI::header ), header("Link to existing $svc"), +print header("Link to existing $svc"), qq!<FORM ACTION="!, popurl(1), qq!process/link.cgi" METHOD=POST>!; if ( $link_field ) { |