X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=kernel%2Fdefault.fml;h=29c21b50e2b73e8a348f32e23d20a9e997637951;hb=4938d0c2e8f4e1eec397c2bfbbc7e23fd150c369;hp=d512392caf8db20327d88866885e8560cfe9a0f9;hpb=e11028ba3000e458c269b1c5e330f4920218e6c4;p=egate.git

diff --git a/kernel/default.fml b/kernel/default.fml
index d512392..29c21b5 100644
--- a/kernel/default.fml
+++ b/kernel/default.fml
@@ -1,5 +1,5 @@
 # Fml scripts to display MARC records
-# $Id: default.fml,v 1.4 1995/03/02 09:32:10 adam Exp $
+# $Id: default.fml,v 1.5 1995/05/18 12:03:08 adam Exp $
 \func f0 rec {
 	\foreach line {\rec} {
 		\line \index 1 \ 
@@ -56,7 +56,7 @@
 	\foreach line {\rec} {\code}
 }
 
-\func f1 record {
+\func f2 record {
 	\marc {\record} {
 		\case 245 .. [a] { \info } 60
 		\case 260 .. c { - \info} 9
@@ -64,7 +64,7 @@
 	\n
 }
 
-\func f2 record {
+\func f1 record {
 	\foreach line {\record} {
 		\case 245 .. [ab] {\info\ } 400
 		\casx 260 [abc] {\n\ \ \info} {\ \info} {}