X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=49bcbc08c22c499e539627ba04a77d0e29331fe4;hb=bbbdd40d71fa66405224872a173a080a7a7dbfef;hp=8e097c656334e0b93b726419c0944e2d012caa89;hpb=f1038a648b3d53db925b23519e7cd2a30c6837ed;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index 8e097c656..49bcbc08c 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -66,12 +66,13 @@ sub handler use IO::Handle; use IO::File; use String::Approx qw(amatch); - use HTML::Widgets::SelectLayers; - use FS::UID qw(cgisuidsetup dbh getotaker datasrc); + 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); + use FS::Msgcat qw(gettext geterror); use FS::agent; use FS::agent_type; @@ -105,6 +106,8 @@ sub handler 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 ) = @_;