git.rot13.org Git - webpac2/blob - conf/normalize/minimal.pl

   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 marc('999','a',
  31         rec('200','i1')
  32 );
  33
  34 }