X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=056efa88b50e038ce5bb03c77fc058dcf1a7f0da;hb=0da1c2b1d5dbe10b304d131f6807b18a237b5d45;hp=5f244921e72ccb609f11825e62737fcea27f452f;hpb=f96adaf19c0097ef8c9d6f29a5541b75381cc05d;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index 5f244921e..056efa88b 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -67,11 +67,12 @@ sub handler use IO::File; use String::Approx qw(amatch); use HTML::Widgets::SelectLayers; - use FS::UID qw(cgisuidsetup dbh getotaker datasrc); + 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; @@ -104,7 +105,9 @@ sub handler use FS::svc_www; use FS::type_pkgs; use FS::part_export; - #use FS::part_export_option; + use FS::part_export_option; + use FS::export_svc; + use FS::msgcat; *CGI::redirect = sub { my( $self, $location ) = @_;