---
 acqui/basketgroup.pl |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/acqui/basketgroup.pl b/acqui/basketgroup.pl
index a3b7dc9..69de099 100755
--- a/acqui/basketgroup.pl
+++ b/acqui/basketgroup.pl
@@ -238,7 +238,10 @@ sub printbasketgrouppdf{
         }
         $orders{$basket->{basketno}...@ba_orders;
     }
-    print $input->header( -type => 'application/pdf', -attachment => 
$basketgroup->{name}.'.pdf' );
+    print $input->header(
+        -type       => 'application/pdf',
+        -attachment => ( $basketgroup->{name} || $basketgroupid ) . '.pdf'
+    );
     my $pdf = printpdf($basketgroup, $bookseller, $baskets, \%orders, 
$bookseller->{gstrate} || C4::Context->preference("gist")) || die "pdf 
generation failed";
     print $pdf;
     exit;
-- 
1.7.1

_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-patches

Reply via email to