X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=htetc%2Fhandler.pl;h=851b2e7d2cf1ba0734f1e59244e95c45dc1303e1;hb=550685eff557af23e242c545d6a9e27a7ef44f23;hp=f115104b129ba71a1fe1697a6c739357ef37b2fe;hpb=d9649d434ba0955cd079d70e885b9f33f5ad85b5;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index f115104b1..851b2e7d2 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -20,6 +20,8 @@ use HTML::Mason::ApacheHandler; use strict; +###use Module::Refresh;### + # List of modules that you want to use from components (see Admin # manual for details) #{ package HTML::Mason::Commands; @@ -93,19 +95,25 @@ sub handler use Date::Format; use Date::Parse; use Time::Local; + use Time::Duration; use Tie::IxHash; + use URI::Escape; use HTML::Entities; + use JSON; use IO::Handle; use IO::File; + use IO::Scalar; use Net::Whois::Raw qw(whois); if ( $] < 5.006 ) { eval "use Net::Whois::Raw 0.32 qw(whois)"; die $@ if $@; } + use Text::CSV_XS; + use Spreadsheet::WriteExcel; use Business::CreditCard; use String::Approx qw(amatch); use Chart::LinesPoints; - use HTML::Widgets::SelectLayers 0.03; + use HTML::Widgets::SelectLayers 0.05; use FS; use FS::UID qw(cgisuidsetup dbh getotaker datasrc driver_name); use FS::Record qw(qsearch qsearchs fields dbdef); @@ -114,7 +122,7 @@ sub handler small_custview myexit http_header); use FS::UI::Web; use FS::Msgcat qw(gettext geterror); - use FS::Misc qw( send_email ); + use FS::Misc qw( send_email send_fax ); use FS::Report::Table::Monthly; use FS::TicketSystem; @@ -160,6 +168,8 @@ sub handler use FS::rate; use FS::rate_region; use FS::rate_prefix; + use FS::payment_gateway; + use FS::agent_payment_gateway; use FS::XMLRPC; if ( %%%RT_ENABLED%%% ) { @@ -263,6 +273,8 @@ sub handler } # end package HTML::Mason::Commands; + ###Module::Refresh->refresh;### + $r->content_type('text/html'); #eorar