X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=557ec02ed21185719e79c663c218e5b7c7d64542;hb=dd87db7f012de20494b3ff09350de92d617d723c;hp=a17aff10efe5bfd20362d7225c503286f9decafa;hpb=52a2dbebe522c0866e18f09a169d39a0cbd4d7b8;p=freeside.git

diff --git a/htetc/handler.pl b/htetc/handler.pl
index a17aff10e..557ec02ed 100644
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -40,7 +40,7 @@ use vars qw($r);
 
 if ( %%%RT_ENABLED%%% ) {
  eval '
-   use lib ("/opt/rt3/local/lib", "/opt/rt3/lib");
+   use lib ( "/opt/rt3/local/lib", "/opt/rt3/lib" );
    use RT;
    use vars qw($Nobody $SystemUser);
    RT::LoadConfig();
@@ -115,6 +115,7 @@ sub handler
       use FS::Msgcat qw(gettext geterror);
       use FS::Misc qw( send_email );
       use FS::Report::Table::Monthly;
+      use FS::TicketSystem;
 
       use FS::agent;
       use FS::agent_type;
@@ -123,7 +124,7 @@ sub handler
       use FS::cust_bill_pay;
       use FS::cust_credit;
       use FS::cust_credit_bill;
-      use FS::cust_main;
+      use FS::cust_main qw(smart_search);
       use FS::cust_main_county;
       use FS::cust_pay;
       use FS::cust_pkg;
@@ -175,12 +176,14 @@ sub handler
           use RT::CustomFields;
           use RT::CustomFieldValues;
           use RT::TicketCustomFieldValues;
-      
+
           use RT::Interface::Web;
           use MIME::Entity;
           use Text::Wrapper;
           use CGI::Cookie;
           use Time::ParseDate;
+          use HTML::Scrubber;
+          use Text::Quoted;
         ';
         die $@ if $@;
       }
@@ -283,8 +286,8 @@ sub handler
 
       RT::Init();
 
-      # We don't need to handle non-text items
-      return -1 if defined( $r->content_type ) && $r->content_type !~ m|^text/|io;
+      # We don't need to handle non-text, non-xml items
+      return -1 if defined( $r->content_type ) && $r->content_type !~ m!(^text/|\bxml\b)!io;
 
     } else {
       $ah->interp->set_escape( 'h' => sub { ${$_[0]}; } );
@@ -303,7 +306,9 @@ sub handler
 #!!
 #    if ($RT::Handle->TransactionDepth) {
 #	$RT::Handle->ForceRollback;
-#    	$RT::Logger->crit("Transaction not committed. Usually indicates a software fault. Data loss may have occurred") ;
+#    	$RT::Logger->crit(
+#"Transaction not committed. Usually indicates a software fault. Data loss may have occurred"
+#       );
 #    }
 
     $status;