checkpoint of new tax rating system

[freeside.git] / htetc / handler.pl

diff --git a/htetc/handler.pl b/htetc/handler.pl
index 834d4c8..d2fe52d 100644 (file)
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -151,6 +151,7 @@ sub handler
       use FS::cust_main_county;
       use FS::cust_pay;
       use FS::cust_pkg;
+      use FS::part_pkg_taxclass;
       use FS::cust_pkg_reason;
       use FS::cust_refund;
       use FS::cust_svc;
@@ -206,6 +207,12 @@ sub handler
       use FS::reason_type;
       use FS::reason;
       use FS::cust_main_note;
+      use FS::tax_class;
+      use FS::cust_tax_location;
+      use FS::part_pkg_taxproduct;
+      use FS::part_pkg_taxoverride;
+      use FS::part_pkg_taxrate;
+      use FS::tax_rate;
 
       if ( %%%RT_ENABLED%%% ) {
         eval '
@@ -224,12 +231,22 @@ sub handler
           use RT::CustomFieldValues;
           use RT::ObjectCustomFieldValues;
 
+          #blah.  manually updated from RT::Interface::Web::Handler
           use RT::Interface::Web;
           use MIME::Entity;
           use Text::Wrapper;
           use Time::ParseDate;
+          use Time::HiRes;
           use HTML::Scrubber;
-          use Text::Quoted;
+
+          #slow, unreliable, segfaults and is optional
+          #see rt/html/Ticket/Elements/ShowTransactionAttachments
+          #use Text::Quoted;
+
+          #?#use File::Path qw( rmtree );
+          #?#use File::Glob qw( bsd_glob );
+          #?#use File::Spec::Unix;
+
         ';
         die $@ if $@;
       }