From: Jonathan Prykop <jonathan@freeside.biz>
Date: Tue, 14 Apr 2015 00:18:41 +0000 (-0500)
Subject: RT#18834: Cacti integration [added thaw/decode]
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=600e1ad4ae42a8800527660038b74eaedc13a958;hp=03c9f5e33216c503fb52dc02826426b17f01f629

RT#18834: Cacti integration [added thaw/decode]
---

diff --git a/FS/FS/part_export/cacti.pm b/FS/FS/part_export/cacti.pm
index abeb5e4d7..740be25f0 100644
--- a/FS/FS/part_export/cacti.pm
+++ b/FS/FS/part_export/cacti.pm
@@ -27,7 +27,9 @@ use FS::cacti_page;
 use File::Rsync;
 use File::Slurp qw( slurp );
 use File::stat;
-use MIME::Base64 qw( encode_base64 );
+use MIME::Base64 qw( decode_base64 encode_base64 );
+use Storable qw(thaw);
+
 
 use vars qw( %info );
 
@@ -275,7 +277,8 @@ and stores the generated pages in the database.
 =cut
 
 sub process_graphs {
-  my ($job,$param) = @_;
+  my $job = shift;
+  my $param = thaw(decode_base64(shift));
 
   $job->update_statustext(10);
   my $cachedir = $FS::UID::cache_dir . '/cacti-graphs/';