Substitute broken JSON::XS with Cpanel::JSON::XS

[freeside.git] / FS / FS / Mason.pm

diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm
index 2303176..76c3000 100644 (file)
--- a/FS/FS/Mason.pm
+++ b/FS/FS/Mason.pm
@@ -77,7 +77,8 @@ if ( -e $addl_handler_use_file ) {
   use HTML::TableExtract qw(tree);
   use HTML::FormatText;
   use HTML::Defang;
-  use JSON::XS;
+#  use JSON::XS;        ! Maintainers deployed app-breaking defaults,
+  use Cpanel::JSON::XS; # this is considered safe compatible drop-in replacement
 #  use XMLRPC::Transport::HTTP;
 #  use XMLRPC::Lite; # for XMLRPC::Serializer
   use MIME::Base64;
@@ -99,7 +100,7 @@ if ( -e $addl_handler_use_file ) {
   use Excel::Writer::XLSX;
   #use Excel::Writer::XLSX::Utility; #redundant with above
 
-  use Business::CreditCard 0.30; #for mask-aware cardtype()
+  use Business::CreditCard 0.35; #for new mastercard ranges and visa lengths
   use NetAddr::IP;
   use Net::MAC::Vendor;
   use Net::Ping;
@@ -123,6 +124,7 @@ if ( -e $addl_handler_use_file ) {
   use HTML::Widgets::SelectLayers 0.07; #should go away in favor of
                                         #selectlayers.html
   use Locale::Country;
+  use Number::Phone::Country qw( noexport );
   use Business::US::USPS::WebTools::AddressStandardization;
   use Geo::GoogleEarth::Pluggable;
   use LWP::UserAgent;
@@ -392,6 +394,8 @@ if ( -e $addl_handler_use_file ) {
   use FS::fiber_olt;
   use FS::olt_site;
   use FS::access_user_page_pref;
+  use FS::part_svc_msgcat;
+  use FS::saved_search;
   # Sammath Naur
 
   if ( $FS::Mason::addl_handler_use ) {
@@ -665,7 +669,7 @@ the same "random" numbers.
 
 Works around a Net::SSLeay connection error by creating and deleting an SSL
 context, so subsequent connections do not error out with a CTX_new (900 NET OR
-SSL ERROR).
+SSL ERROR).  See http://bugs.debian.org/830152
 
 =cut