diff --git a/C4/Biblio.pm b/C4/Biblio.pm index 38dda062cf..4f1cf91585 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -1640,25 +1640,15 @@ sub GetMarcISBN { $scope = '020'; } my @marcisbns; - my $isbn = ""; - my $tag = ""; my $marcisbn; foreach my $field ( $record->field($scope) ) { - my $value = $field->as_string(); + my $isbn = $field->as_string(); if ( $isbn ne "" ) { $marcisbn = { marcisbn => $isbn, }; push @marcisbns, $marcisbn; - $isbn = $value; - } - if ( $isbn ne $value ) { - $isbn = $isbn . " " . $value; } } - if ($isbn) { - $marcisbn = { marcisbn => $isbn }; - push @marcisbns, $marcisbn; #load last tag into array - } return \@marcisbns; } # end GetMarcISBN