used in rt autohandler. i wonder why this never bit before

[freeside.git] / htetc / handler.pl

diff --git a/htetc/handler.pl b/htetc/handler.pl
index 4d566c2..09bada4 100644 (file)
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -120,6 +120,7 @@ sub handler
       use Text::CSV_XS;
       use Spreadsheet::WriteExcel;
       use Business::CreditCard 0.30; #for mask-aware cardtype()
+      use NetAddr::IP;
       use String::Approx qw(amatch);
       use Chart::LinesPoints;
       use Chart::Mountain;
@@ -228,7 +229,8 @@ sub handler
           use Text::Wrapper;
           use Time::ParseDate;
           use HTML::Scrubber;
-          use Text::Quoted;
+          #use Text::Quoted; #slow, unreliable, segfaults and is optional
+          use Time::HiRes;
         ';
         die $@ if $@;
       }
@@ -337,8 +339,6 @@ sub handler
     if ( $r->filename =~ /\/rt\// ) { #RT
 
       $ah->interp($rt_interp);
-      # MasonX::Request::ExtendedCompRoot
-      #$ah->interp->comp_root( '/rt'. $ah->interp->comp_root() );
 
       local $SIG{__WARN__};
       local $SIG{__DIE__};