From 33112dda50de9bb45cfa463b6a94fdd5e8545bc1 Mon Sep 17 00:00:00 2001 From: tipaul Date: Tue, 7 Jun 2005 10:00:47 +0000 Subject: [PATCH] adding $b to mainentry (in UNIMARC, for personal names, $a is the surname, $b is the firstname) --- C4/AuthoritiesMarc.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index c5a9dbac39..be598d1e3b 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -183,7 +183,7 @@ sub authoritysearch { $newline{used} = &AUTHcount_usage($result[$counter]); $newline{biblio_fields} = $tags_using_authtype; $newline{even} = $counter % 2; - $newline{mainentry} = $record->field($mainentrytag)->subfield('a') if $record->field($mainentrytag); + $newline{mainentry} = $record->field($mainentrytag)->subfield('a')." ".$record->field($mainentrytag)->subfield('b') if $record->field($mainentrytag); $counter++; push @finalresult, \%newline; } @@ -921,6 +921,9 @@ Paul POULAIN paul.poulain@free.fr # $Id$ # $Log$ +# Revision 1.18 2005/06/07 10:00:47 tipaul +# adding $b to mainentry (in UNIMARC, for personal names, $a is the surname, $b is the firstname) +# # Revision 1.17 2005/06/01 12:51:02 tipaul # some fixes & improvements for dictionnary search in librarian interface # -- 2.20.1