From f2de40d02a1a416a0cc7957f440a5154ab93637b Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Tue, 29 Jul 2014 16:12:52 -0300 Subject: [PATCH] Bug 12674: GetMarcISSN should not return empty ISSN This patch makes GetMarcISSN test for empty subfield before pushing to the result array. To test: - Run the regression test => FAILS for all MARC flavours - Apply the patch - Run the regression test => SUCCESS: tests pass - Sign off Sponsored-by: Universidad Nacional de Cordoba Signed-off-by: Jonathan Druart --- C4/Biblio.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index eb2ee2f..f2e7014 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -1730,7 +1730,8 @@ sub GetMarcISSN { } my @marcissns; foreach my $field ( $record->field($scope) ) { - push @marcissns, $field->subfield( 'a' ); + push @marcissns, $field->subfield( 'a' ) + if ( $field->subfield( 'a' ) ne "" ); } return \@marcissns; } # end GetMarcISSN -- 2.0.0.rc2