--- trunk/conf/normalize/mapping.pl 2006/06/29 23:29:02 548 +++ trunk/conf/normalize/mapping.pl 2006/06/30 10:16:05 549 @@ -6,6 +6,12 @@ rec('010') ); +if (rec('300') && first(rec('300')) =~ m/prijevod/i) { + marc_indicators('041', 1, ' '); +} else { + marc_indicators('041', 0, ' '); +} + marc_repeatable_subfield('041','a', rec('101') ); @@ -92,7 +98,7 @@ rec('610') ); -marc_indicators('100', 0, ' '); +marc_indicators('100', 1, ' '); marc('100','a', join_with(', ', rec('700', 'a'), @@ -100,6 +106,8 @@ ) ); + +marc_indicators('700', 1, ' '); marc('700','a', join_with(', ', rec('701', 'a'),