X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=d55ba3310ed01c0d25768fe866730fd66b9e243f;hb=66729728e57c13e44eaac51dc8deaf37e47b7530;hp=680d11ec8d836f71dc5a3d3a07f60cc1aa9d4811;hpb=8f42b751aebda2e7dce2c363bed6f1e15b411b1d;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index 680d11ec8..d55ba3310 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -61,16 +61,20 @@ sub handler #use CGI::Carp qw(fatalsToBrowser); use Date::Format; use Date::Parse; + use Time::Local; use Tie::IxHash; use HTML::Entities; use IO::Handle; use IO::File; use String::Approx qw(amatch); - use FS::UID qw(cgisuidsetup dbh getotaker datasrc); + use Chart::LinesPoints; + use HTML::Widgets::SelectLayers 0.02; + use FS::UID qw(cgisuidsetup dbh getotaker datasrc driver_name); use FS::Record qw(qsearch qsearchs fields dbdef); use FS::Conf; use FS::CGI qw(header menubar popurl table itable ntable idiot eidiot - small_custview myexit); + small_custview myexit http_header); + use FS::Msgcat qw(gettext geterror); use FS::agent; use FS::agent_type; @@ -102,6 +106,10 @@ sub handler use FS::svc_forward; use FS::svc_www; use FS::type_pkgs; + use FS::part_export; + use FS::part_export_option; + use FS::export_svc; + use FS::msgcat; *CGI::redirect = sub { my( $self, $location ) = @_;