From 58a94ef42f0f3fcf23da5ebefe6ed12036e308c1 Mon Sep 17 00:00:00 2001 From: mark Date: Thu, 20 Jan 2011 03:58:36 +0000 Subject: load CAM::PDF on startup --- FS/FS/bill_batch.pm | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/FS/FS/bill_batch.pm b/FS/FS/bill_batch.pm index 00aab7ed2..3afe20915 100644 --- a/FS/FS/bill_batch.pm +++ b/FS/FS/bill_batch.pm @@ -4,6 +4,7 @@ use strict; use vars qw( @ISA $me $DEBUG ); use FS::Record qw( qsearch qsearchs dbh ); use FS::cust_bill_batch; +use CAM::PDF; @ISA = qw( FS::Record ); $me = '[ FS::bill_batch ]'; @@ -53,12 +54,6 @@ Typeset the entire batch as a PDF file. Returns the PDF as a string. =cut sub print_pdf { - eval 'use CAM::PDF'; - if ( $@ ) { - die "CAM::PDF not installed\n" if $@ =~ /^Can't locate/; - die "Failed to load CAM::PDF: '$@'\n"; - } - my $self = shift; my $job = shift; $job->update_statustext(0) if $job; -- cgit v1.2.1