<%
-# <!-- $Id: svc_acct.cgi,v 1.6 2001-10-24 15:29:31 ivan Exp $ -->
+# <!-- $Id: svc_acct.cgi,v 1.7 2001-10-26 10:24:56 ivan Exp $ -->
use strict;
use vars qw( $cgi @svc_acct $sortby $query $mydomain );
idiot("Account not found");
} else {
my($total)=scalar(@svc_acct);
- print $cgi->header( '-expires' => 'now' ),
+ print $cgi->header( @FS::CGI::header ),
header("Account Search Results",''),
"$total matching accounts found",
&table(), <<END;