/[webpac2]/trunk/conf/normalize/ff-peri.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

Diff of /trunk/conf/normalize/ff-peri.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 975 by dpavlin, Sat Nov 3 12:29:16 2007 UTC revision 1090 by dpavlin, Tue Feb 12 18:32:13 2008 UTC
# Line 241  if (   ( rec('200','a') =~ m/^A /) || Line 241  if (   ( rec('200','a') =~ m/^A /) ||
241  marc_compose('245',  marc_compose('245',
242          'a', suffix(          'a', suffix(
243                  ( ! ( rec('200','d') || rec('200','e') || rec('200','k') ) ) && ( rec('200','f') ) ? ' /' :                    ( ! ( rec('200','d') || rec('200','e') || rec('200','k') ) ) && ( rec('200','f') ) ? ' /' :  
244                  ( rec('200','d') ) ? ' =' :                  ( rec('200','d') ) ? ' = ' :
245                  ( rec('200','e') ) ? ' :' :                  ( rec('200','e') ) ? ' : ' :
246                  ( rec('200','k') ) ? ' ;' :                  ( rec('200','k') ) ? ' ; ' :
247                          '',                          '',
248                          rec('200','a'),                          rec('200','a'),
249          ),          ),
Legend:
Removed from v.975  
changed lines
  Added in v.1090
  ViewVC Help
Powered by ViewVC 1.1.26