X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=htetc%2Fhandler.pl;h=755e664b97522a8ea6c7b0bc147062f226e3810b;hp=f47d4c9bf4e146e1329b16aa5d0975a5939dff3e;hb=1748e50c012a65ecb729f15e09169f5d8122a3b1;hpb=3c8870ee619416f126a65c93d5ef7a2f2e24bc96 diff --git a/htetc/handler.pl b/htetc/handler.pl index f47d4c9bf..755e664b9 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -119,7 +119,7 @@ sub handler 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); @@ -127,7 +127,8 @@ sub handler use FS::Conf; use FS::CGI qw(header menubar popurl rooturl table itable ntable idiot eidiot small_custview myexit http_header); - use FS::UI::Web; + use FS::UI::Web qw(svc_url); + use FS::UI::bytecount; use FS::Msgcat qw(gettext geterror); use FS::Misc qw( send_email send_fax states_hash counties state_label ); use FS::Report::Table::Monthly; @@ -335,6 +336,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); };