Minor changes.
[egate.git] / kernel / default.fml
index d512392..29c21b5 100644 (file)
@@ -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} {}