X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FMason.pm;h=f05ac03392978114fbbd6aa02d4f029f7ade1c67;hb=379c06ccd4b984bfa8130d98f862799239a8d00c;hp=897b7817349f6d1c4a97b48ee73a5270e0b0a06e;hpb=aaa1a91c209ec3547b2c62dc59af935649a62b58;p=freeside.git

diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm
index 897b78173..f05ac0339 100644
--- a/FS/FS/Mason.pm
+++ b/FS/FS/Mason.pm
@@ -57,7 +57,7 @@ if ( -e $addl_handler_use_file ) {
   use CGI::Cookie;
   use List::Util qw( max min sum );
   use List::MoreUtils qw( first_index uniq );
-  use Scalar::Util qw( blessed );
+  use Scalar::Util qw( blessed looks_like_number );
   use Data::Dumper;
   use Date::Format;
   use Time::Local;
@@ -131,7 +131,7 @@ if ( -e $addl_handler_use_file ) {
   use FS::UID qw( dbh datasrc driver_name );
   use FS::Record qw( qsearch qsearchs fields dbdef
                     str2time_sql str2time_sql_closing
-                    midnight_sql
+                    midnight_sql regexp_sql
                    );
   use FS::Conf;
   use FS::CGI qw(header menubar table itable ntable idiot
@@ -156,6 +156,8 @@ if ( -e $addl_handler_use_file ) {
   use FS::Locales;
   use FS::Maketext qw( mt emt js_mt );
 
+  use FS::Query;
+
   use FS::agent;
   use FS::agent_type;
   use FS::domain_record;
@@ -399,6 +401,10 @@ if ( -e $addl_handler_use_file ) {
   use FS::prospect_contact;
   use FS::cust_contact;
   use FS::legacy_cust_history;
+  use FS::quotation_pkg_tax;
+  use FS::cust_pkg_reason_fee;
+  use FS::part_svc_link;
+  use FS::access_user_log;
   # Sammath Naur
 
   if ( $FS::Mason::addl_handler_use ) {
@@ -457,6 +463,7 @@ if ( -e $addl_handler_use_file ) {
     die $@ if $@;
   }
 
+  no warnings 'redefine';
   *CGI::redirect = sub {
     my $self = shift;
     my $cookie = '';