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

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

revision 602 by dpavlin, Sun Jul 23 17:33:27 2006 UTC revision 604 by dpavlin, Sun Jul 30 14:19:54 2006 UTC
# Line 89  marc_compose('245', Line 89  marc_compose('245',
89          'b', rec('200','e'),          'b', rec('200','e'),
90          'c', rec('200','f'),          'c', rec('200','f'),
91  # FIXME append to last subfield  # FIXME append to last subfield
92  #       '+', prefix('. ', rec('200','c') ),          '+', prefix('. ', rec('200','c') ),
93  );  );
94    
95    
# Line 120  marc('250','a', Line 120  marc('250','a',
120    
121  # FIXME ponovljiva potpolja u originalnom redosljedu  # FIXME ponovljiva potpolja u originalnom redosljedu
122  #  #
123  # marc_original_order('260', '210');  marc_original_order('260', '210');
124    
125  marc('260','a',  marc('260','a',
126          rec('210','a'),          rec('210','a'),
# Line 255  marc('100','a', Line 255  marc('100','a',
255          )          )
256  );  );
257    
258  _debug(2);  #_debug(2);
259    
260  marc_indicators('700', 1, ' ');  marc_indicators('700', 1, ' ');
261    
# Line 320  marc('700','a', Line 320  marc('700','a',
320          )          )
321  );  );
322    
323  _debug(0);  #_debug(0);
324    
325    
326  if ( rec('710','f') ) {  if ( rec('710','f') ) {

Legend:
Removed from v.602  
changed lines
  Added in v.604

  ViewVC Help
Powered by ViewVC 1.1.26