removing 2 warnings
authorPaul Poulain <paul.poulain@biblibre.com>
Tue, 23 Jun 2009 10:54:04 +0000 (12:54 +0200)
committerHenri-Damien LAURENT <henridamien.laurent@biblibre.com>
Wed, 30 Sep 2009 09:30:26 +0000 (11:30 +0200)
acqui/basketgroup.pl

index c760936..e8027a8 100755 (executable)
@@ -276,7 +276,7 @@ if (! $op ) {
                     push(@ba_order, undef);
                 }
                 if ($ord->{itemtype}){
-                    push(@ba_order, $itemtypes->{$bib->{itemtype}}->{description});
+                    push(@ba_order, $itemtypes->{$bib->{itemtype}}->{description}) if $bib->{itemtype};
                 } else {
                     push(@ba_order, undef);
                 }
@@ -286,7 +286,7 @@ if (! $op ) {
                     push(@ba_order, $ord->{$key});                                                  #Order lines
                 }
                 push(@ba_order, $bookseller->{discount});
-                push(@ba_order, $bookseller->{gstrate}*100 || C4::Context->preference("gist"));
+                push(@ba_order, $bookseller->{gstrate}*100 || C4::Context->preference("gist") || 0);
                 push(@ba_orders, \@ba_order);
             }
         }