diff options
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/part_export/cacti.pm | 7 |
1 files changed, 5 insertions, 2 deletions
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/'; |