[Koha-patches] [biblibre-integration 01/19] This little hack makes BuildUnimarcHierarchy able to work with any 2.. field.

Henri-Damien LAURENT henridamien.laurent at biblibre.com
Fri Aug 28 23:47:36 CEST 2009


From: Jean-André Santoni <jeanandre.santoni at biblibre.com>

---
 C4/AuthoritiesMarc.pm |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm
index bc32a6c..3be5ee4 100644
--- a/C4/AuthoritiesMarc.pm
+++ b/C4/AuthoritiesMarc.pm
@@ -1217,7 +1217,7 @@ sub BuildUnimarcHierarchy{
   my $record = shift @_;
   my $class = shift @_;
   my $authid_constructed = shift @_;
-  my $authid=$record->subfield('250','3');
+  my $authid=$record->subfield('2..','3');
   my %cell;
   my $parents=""; my $children="";
   my (@loopparents, at loopchildren);
@@ -1238,7 +1238,7 @@ sub BuildUnimarcHierarchy{
   $cell{"class"}=$class;
   $cell{"loopauthid"}=$authid;
   $cell{"current_value"} =1 if $authid eq $authid_constructed;
-  $cell{"value"}=$record->subfield('250',"a");
+  $cell{"value"}=$record->subfield('2..',"a");
   return \%cell;
 }
 
-- 
1.6.0.4



More information about the Koha-patches mailing list