X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=164da3702341c46cacee0622497340ed7461508c;hb=1d719ccff55b1a82208fdf44b6dcd2da96b3c42e;hp=d7a6c6a53e9494b4d9d6b307bc0520c8b6f86a5d;hpb=25c113d3edad9809e3834a298f79987fa65e6d7c;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index d7a6c6a53..164da3702 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -114,12 +114,12 @@ sub handler } use Text::CSV_XS; use Spreadsheet::WriteExcel; - use Business::CreditCard; + use Business::CreditCard 0.30; #for mask-aware cardtype() use String::Approx qw(amatch); use Chart::LinesPoints; use Chart::Mountain; use Color::Scheme; - use HTML::Widgets::SelectLayers 0.06; + use HTML::Widgets::SelectLayers 0.07; use Locale::Country; use FS; use FS::UID qw(cgisuidsetup dbh getotaker datasrc driver_name); @@ -129,7 +129,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 states_hash state_label ); + use FS::Misc qw( send_email send_fax states_hash counties state_label ); use FS::Report::Table::Monthly; use FS::TicketSystem; @@ -335,6 +335,8 @@ sub handler $ah->interp->set_escape( 'h' => sub { ${$_[0]}; } ); } + $ah->interp->ignore_warnings_expr('.'); + my %session; my $status; eval { $status = $ah->handle_request($r); };