From 8e15f71daf60884a838bd08fd0f5fc61b1b5e2b8 Mon Sep 17 00:00:00 2001
From: Mark Tompsett <mtompset@hotmail.com>
Date: Sun, 18 Nov 2018 05:36:44 +0000
Subject: [PATCH] Bug 21853: (follow-up) to solve printpdf error

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Theoretically this follow-up makes no difference. All modules only export
printpdf and now we are just asking explicitly for printpdf. But if it
resolves some exception on the rule..

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
(cherry picked from commit 5b62714e47d5acd0a4c371024edacc02cfe6f5b5)

Signed-off-by: Jesse Maseto <jesse@bywatersolution.com>
(cherry picked from commit 21536e3314091778c9baf2984097715e071abfbc)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 acqui/basketgroup.pl |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/acqui/basketgroup.pl b/acqui/basketgroup.pl
index 0318ac9..afd9886 100755
--- a/acqui/basketgroup.pl
+++ b/acqui/basketgroup.pl
@@ -133,7 +133,7 @@ sub printbasketgrouppdf{
         $pdfformat = "Koha::$pdfformat";
         my $pdfformat_filepath = File::Spec->catfile(split /::/, $pdfformat) . '.pm';
         require $pdfformat_filepath;
-        import $pdfformat;
+        import $pdfformat qw(printpdf);
     }
     else {
         print $input->header;
-- 
1.7.2.5