--- trunk/conf/normalize/ff-libri.pl	2007/02/15 22:42:51	801
+++ trunk/conf/normalize/ff-libri.pl	2007/02/15 22:43:03	802
@@ -1,8 +1,9 @@
-##################################################################################
-## Ova datoteka sadrži pravila za generiranje MARC21 ISO 2709 izlazne datoteke. ##
-## Ulazni format je CDS/ISIS sa zapisima u UNIMARC-u.                           ##
-##################################################################################
-
+#########################################################################
+##									##
+## Ova datoteka sadrži pravila za generiranje MARC21 ISO 2709 izlazne   ##
+## datoteke. Ulazni format je CDS/ISIS sa zapisima u UNIMARC-u.		##
+##									##	
+##########################################################################
 
 # konvertira se ako postoji polje 200^a
 
@@ -140,28 +141,18 @@
 
 ### 111 i 110
 # provjeriti ispise naslova iz svake baze - moguće su greške.
+# ovo vrijedi za FFSFB
 
 if ( rec('710','f') ) {
 
 marc_indicators('111', 2, ' ');
-marc('111','a',
-	rec('710','a')
-);
-
-marc('111','c',
-	rec('710','e')
-);
 
-marc('111','d',
-	rec('710','f')
-);
-
-marc('111','e',
-	rec('710','b')
-);
-
-marc('111','n',
-	rec('710','d')
+marc_compose('111',
+	'a', rec('710','a'),
+	'e', rec('710','b'),
+	'n', rec('710','d'),
+	'd', rec('710','f'),
+	'c', rec('710','e'),
 );
 
 
@@ -176,7 +167,7 @@
 	rec('710','c')
 );
 
-};
+}
 
 
 ### 245 indikatori