From 270c5b138795a90c14654f83ba74d8d3d53a7971 Mon Sep 17 00:00:00 2001 From: tipaul Date: Thu, 16 Sep 2004 09:45:44 +0000 Subject: [PATCH] bugfix : report only the "tagtoreport" field --- authorities/blinddetail-biblio-search.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/authorities/blinddetail-biblio-search.pl b/authorities/blinddetail-biblio-search.pl index 1a4c56be77..320e0cdda7 100755 --- a/authorities/blinddetail-biblio-search.pl +++ b/authorities/blinddetail-biblio-search.pl @@ -79,7 +79,8 @@ my @loop_data =(); my $tag; my @loop_data =(); if ($authid) { - foreach my $field ($record->fields($auth_type->{auth_tag_to_report})) { +warn "report $authtypecode => ".$auth_type->{auth_tag_to_report}.$record->as_formatted; + foreach my $field ($record->field($auth_type->{auth_tag_to_report})) { my @subfields_data; my @subf=$field->subfields; # loop through each subfield -- 2.39.5