projects
/
egate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Minor changes.
[egate.git]
/
kernel
/
default.fml
diff --git
a/kernel/default.fml
b/kernel/default.fml
index
d512392
..
29c21b5
100644
(file)
--- a/
kernel/default.fml
+++ b/
kernel/default.fml
@@
-1,5
+1,5
@@
# Fml scripts to display MARC records
# 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 \
\func f0 rec {
\foreach line {\rec} {
\line \index 1 \
@@
-56,7
+56,7
@@
\foreach line {\rec} {\code}
}
\foreach line {\rec} {\code}
}
-\func f1 record {
+\func f2 record {
\marc {\record} {
\case 245 .. [a] { \info } 60
\case 260 .. c { - \info} 9
\marc {\record} {
\case 245 .. [a] { \info } 60
\case 260 .. c { - \info} 9
@@
-64,7
+64,7
@@
\n
}
\n
}
-\func f2 record {
+\func f1 record {
\foreach line {\record} {
\case 245 .. [ab] {\info\ } 400
\casx 260 [abc] {\n\ \ \info} {\ \info} {}
\foreach line {\record} {
\case 245 .. [ab] {\info\ } 400
\casx 260 [abc] {\n\ \ \info} {\ \info} {}