RT# 78547 - Flag to disable email/print/fax/etc during tests or reports
[freeside.git] / FS / FS / msg_template / http.pm
index a2b0986..12269a1 100644 (file)
@@ -7,7 +7,7 @@ use vars qw( $DEBUG $conf );
 # needed to talk to the external service
 use LWP::UserAgent;
 use HTTP::Request::Common;
-use JSON;
+use Cpanel::JSON::XS;
 
 # needed to manage prepared messages
 use FS::cust_msg;
@@ -45,7 +45,7 @@ sub prepare {
 
   my( $self, %opt ) = @_;
 
-  my $json = JSON->new->canonical(1);
+  my $json = Cpanel::JSON::XS->new->canonical(1);
 
   my $cust_main = $opt{'cust_main'}; # or die 'cust_main required';
   my $object = $opt{'object'} or die 'object required';
@@ -61,7 +61,7 @@ sub prepare {
   };
   # put override content _somewhere_ so it can be used
   if ( $opt{'override_content'} ) {
-    $document{'content'} = $opt{'override_content'};
+    $document->{'content'} = $opt{'override_content'};
   }
 
   my $request_content = $json->encode($document);