X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fmsg_template%2Fhttp.pm;h=12269a17114df6bfd102d8d4d8fcc3cd3f3eab74;hb=7c5f50804027577aac17d0fcefedcd0d0b6ca180;hp=a2b0986eacd8443342890b13cd062f0c01afd966;hpb=c0c5709fb022b83a482d0b35f7094505766d5868;p=freeside.git

diff --git a/FS/FS/msg_template/http.pm b/FS/FS/msg_template/http.pm
index a2b0986ea..12269a171 100644
--- a/FS/FS/msg_template/http.pm
+++ b/FS/FS/msg_template/http.pm
@@ -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);