X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=e643559f09c2bee6205ed6182850d4908599101e;hb=f02dd9b0e5042ef000d9338089eed50988d48914;hp=b6f6c6975ae0942aace4494f063c527821712fd0;hpb=f5266a4d07d116efd732f433d0f4f3a47b143a7d;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index b6f6c6975..e643559f0 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -57,10 +57,17 @@ sub handler use vars qw( $cgi $p ); use CGI; #use CGI::Carp qw(fatalsToBrowser); + use Date::Format; + use Date::Parse; + use HTML::Entities; use FS::UID qw(cgisuidsetup); use FS::Record qw(qsearch qsearchs fields); use FS::part_svc; - use FS::CGI qw(header menubar popurl table); + use FS::part_pkg; + use FS::pkg_svc; + use FS::cust_pkg; + use FS::cust_svc; + use FS::CGI qw(header menubar popurl table itable ntable); $cgi = new CGI; &cgisuidsetup($cgi); @@ -69,6 +76,8 @@ sub handler } $r->content_type('text/html'); #eorar + + # @FS::CGI::headers or some other way to set no-cache headers!!! my $status = $ah->handle_request($r);