/[webpac2]/trunk/conf/normalize/minimal.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /trunk/conf/normalize/minimal.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1010 - (show annotations)
Tue Nov 6 20:20:37 2007 UTC (16 years, 5 months ago) by dpavlin
File MIME type: text/plain
File size: 346 byte(s)
local

1
2 if ( rec('200','a') ) {
3
4 marc('035','6',
5 join_with('',
6 uc( config() ),
7 ' A',
8 rec('000')
9 )
10 );
11
12 marc_indicators('245', 1, 0);
13
14 marc('245','a',
15 join_with(' / ',
16 join_with(' : ',
17 join_with(' = ',
18 rec('225','a'),
19 rec('225','d')
20 ),
21 rec('225','e')
22 ),
23 join_with(' ; ',
24 rec('225','f'),
25 rec('225','g')
26 ),
27 ),
28 );
29
30 }

  ViewVC Help
Powered by ViewVC 1.1.26