X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=htetc%2Fhandler.pl;h=008b0b5f9d3b3e8c680135b7655792e61da9c383;hp=9b808e68c00b82f6ae37bce440281d9920cd9353;hb=929f432c766bbe3bdeed5b80818a12ddf6ec6339;hpb=36693c42cbaca86f6957d5ed6794624810018bb3 diff --git a/htetc/handler.pl b/htetc/handler.pl index 9b808e68c..008b0b5f9 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -114,6 +114,7 @@ sub handler use String::Approx qw(amatch); use Chart::LinesPoints; use HTML::Widgets::SelectLayers 0.05; + use Locale::Country; use FS; use FS::UID qw(cgisuidsetup dbh getotaker datasrc driver_name); use FS::Record qw(qsearch qsearchs fields dbdef); @@ -122,7 +123,7 @@ sub handler eidiot small_custview myexit http_header); use FS::UI::Web; use FS::Msgcat qw(gettext geterror); - use FS::Misc qw( send_email send_fax ); + use FS::Misc qw( send_email send_fax states_hash state_label ); use FS::Report::Table::Monthly; use FS::TicketSystem; @@ -208,6 +209,7 @@ sub handler my( $self, $location ) = @_; use vars qw($m); + # false laziness w/below if ( defined(@DBIx::Profile::ISA) ) { #profiling redirect my $page =