Bug 15774: Fix insert and update for subscription

Call it a typo

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>

diff --git a/serials/subscription-add.pl b/serials/subscription-add.pl
index 68b80c6..9e503e5 100755 (executable)
--- a/serials/subscription-add.pl
+++ b/serials/subscription-add.pl
@@ -384,8 +384,8 @@ sub redirect_add_subscription {
 
     my @additional_fields;
     my $record = GetMarcBiblio({ biblionumber => $biblionumber, embed_items => 1 });
-    my $basket_fields = Koha::AdditionalFields->search({ tablename => 'aqbasket' });
-    while ( my $field = $basket_fields->next ) {
+    my $subscription_fields = Koha::AdditionalFields->search({ tablename => 'subscription' });
+    while ( my $field = $subscription_fields->next ) {
         my $value = $query->param('additional_field_' . $field->id);
         if ($field->marcfield) {
             my ($field, $subfield) = split /\$/, $field->marcfield;
@@ -503,8 +503,8 @@ sub redirect_mod_subscription {
 
     my @additional_fields;
     my $record = GetMarcBiblio({ biblionumber => $biblionumber, embed_items => 1 });
-    my $basket_fields = Koha::AdditionalFields->search({ tablename => 'aqbasket' });
-    while ( my $field = $basket_fields->next ) {
+    my $subscription_fields = Koha::AdditionalFields->search({ tablename => 'subscription' });
+    while ( my $field = $subscription_fields->next ) {
         my $value = $query->param('additional_field_' . $field->id);
         if ($field->marcfield) {
             my ($field, $subfield) = split /\$/, $field->marcfield;