[Patches] [PATCH] Bug 7138: Can't print basket group order pdf

[koha-patchbot at kohaaloha.com]

From: Katrin Fischer <Katrin.Fischer.83 at web.de>
Date: Thu, 3 Nov 2011 00:44:36 +0100
Subject: [PATCH] Bug 7138: Can't print basket group order pdf

PDF print of basket groups is broken.

To test:

1) Make sure OrderPdfFormat is set to pdfformat::layout2pages or pdfformat::layout3pages
2) Create a basket with orders
3) Close the basket and create a basket group checking the checkbox
4) Print the basket group as PDF

Before patch the file is broken and when opened in an editor contains an error message.
After the patch the PDF should be generated correctly again.

Thx to Chris for helping me to fix the problem.

Signed-off-by: Chris Cormack <chrisc at catalyst.net.nz>
---
 acqui/basketgroup.pl |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/acqui/basketgroup.pl b/acqui/basketgroup.pl
index fbcad0f..d2e1856 100755
--- a/acqui/basketgroup.pl
+++ b/acqui/basketgroup.pl
@@ -187,7 +187,7 @@ sub printbasketgrouppdf{
     my $pdfformat = C4::Context->preference("OrderPdfFormat");
     if ($pdfformat eq 'pdfformat::layout3pages' || $pdfformat eq 'pdfformat::layout2pages'){
 	eval {
-	    require $pdfformat;
+        eval "require $pdfformat";
 	    import $pdfformat;
 	};
 	if ($@){
-- 
1.7.5.4