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

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

revision 757 by dpavlin, Sun Oct 8 18:44:42 2006 UTC revision 758 by dpavlin, Wed Oct 25 11:02:36 2006 UTC
# Line 214  marc('773','t', Line 214  marc('773','t',
214    
215  marc('773','w',  marc('773','w',
216          lookup(          lookup(
217                  sub { 'ffkk/peri/' . rec('000') },                  sub { 'ffkk-peri-' . rec('000') },
218                  'ffkk','peri',                  'ffkk','peri',
219                  sub { rec('11') }                  sub { rec('11') }
220          ) ||          ) ||
221          lookup(          lookup(
222                  sub { 'ffkk/peri/' . rec('000') },                  sub { 'ffkk-peri-' . rec('000') },
223                  'ffkk','peri',                  'ffkk','peri',
224                  sub { first(rec(200,'a')) . ' ' . first(rec('200','e')) },                  sub { first(rec(200,'a')) . ' ' . first(rec('200','e')) },
225          ) ||          ) ||
226    
227          lookup(          lookup(
228                  sub { "ffkk/peri/" . rec('000') },                  sub { "ffkk-peri-" . rec('000') },
229                  'ffkk','peri',                  'ffkk','peri',
230                  sub { rec(200,'a') },                  sub { rec(200,'a') },
231  #               sub { rec(900,'x') },  #               sub { rec(900,'x') },
Legend:
Removed from v.757  
changed lines
  Added in v.758
  ViewVC Help
Powered by ViewVC 1.1.26