X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fbill_batch.pm;h=da6420c7edfcee97bcd7fc40a47bc0130abe27a0;hb=3ece1c396f23e04cd659f1085f6eeee8bdfd846f;hp=d4f2aec294401c5ec2276abb00f1d53606ea48ed;hpb=d883a843dcfce64caeddd2a4abb0982c16a17199;p=freeside.git diff --git a/FS/FS/bill_batch.pm b/FS/FS/bill_batch.pm index d4f2aec29..da6420c7e 100644 --- a/FS/FS/bill_batch.pm +++ b/FS/FS/bill_batch.pm @@ -131,13 +131,11 @@ Returns the agent (see L) for this invoice batch. =cut -use Storable 'thaw'; use Data::Dumper; -use MIME::Base64; sub process_print_pdf { my $job = shift; - my $param = thaw(decode_base64(shift)); + my $param = shift; warn Dumper($param) if $DEBUG; die "no batchnum specified!\n" if ! exists($param->{batchnum}); my $batch = FS::bill_batch->by_key($param->{batchnum});