fix pdf generation by removing obsolete module

[koha.git] / acqui / basketheader.pl

diff --git a/acqui/basketheader.pl b/acqui/basketheader.pl
index da2129f..202f6b9 100755 (executable)
--- a/acqui/basketheader.pl
+++ b/acqui/basketheader.pl
@@ -100,8 +100,8 @@ if ( $op eq 'add_form' ) {
         $template->param( is_an_edit => 1);
         $template->param(
             additional_field_values => { map {
-                $_->field->name => $_->value
-            } Koha::Acquisition::Baskets->find($basketno)->additional_field_values },
+                $_->field->id => $_->value
+            } Koha::Acquisition::Baskets->find($basketno)->additional_field_values->as_list },
         );
     } else {
     #new basket
@@ -171,7 +171,8 @@ if ( $op eq 'add_form' ) {
     }
 
     my @additional_fields;
-    for my $field (Koha::AdditionalFields->search({ tablename => 'aqbasket' })) {
+    my $basket_fields = Koha::AdditionalFields->search({ tablename => 'aqbasket' });
+    while ( my $field = $basket_fields->next ) {
         my $value = $input->param('additional_field_' . $field->id);
         push @additional_fields, {
             id => $field->id,