koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/C4 AuthoritiesMarc.pm,1.17,1.18


From: Paul POULAIN
Subject: [Koha-cvs] CVS: koha/C4 AuthoritiesMarc.pm,1.17,1.18
Date: Tue, 07 Jun 2005 03:00:51 -0700

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24420/C4

Modified Files:
        AuthoritiesMarc.pm 
Log Message:
adding $b to mainentry (in UNIMARC, for personal names, $a is the surname, $b 
is the firstname)

Index: AuthoritiesMarc.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/AuthoritiesMarc.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -r1.17 -r1.18
*** AuthoritiesMarc.pm  1 Jun 2005 12:51:02 -0000       1.17
--- AuthoritiesMarc.pm  7 Jun 2005 10:00:47 -0000       1.18
***************
*** 184,188 ****
                $newline{biblio_fields} = $tags_using_authtype;
                $newline{even} = $counter % 2;
!               $newline{mainentry} = 
$record->field($mainentrytag)->subfield('a') if $record->field($mainentrytag);
                $counter++;
                push @finalresult, \%newline;
--- 184,188 ----
                $newline{biblio_fields} = $tags_using_authtype;
                $newline{even} = $counter % 2;
!               $newline{mainentry} = 
$record->field($mainentrytag)->subfield('a')." 
".$record->field($mainentrytag)->subfield('b') if $record->field($mainentrytag);
                $counter++;
                push @finalresult, \%newline;
***************
*** 922,925 ****
--- 922,928 ----
  # $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




reply via email to

[Prev in Thread] Current Thread [Next in Thread]