/[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 573 by dpavlin, Mon Jul 3 10:32:46 2006 UTC revision 574 by dpavlin, Mon Jul 3 21:08:07 2006 UTC
# Line 186  marc('700','a', Line 186  marc('700','a',
186  #       );  #       );
187  # }  # }
188    
189    _debug( 2 );
190    
191  if ( rec('710','f') ) {  if ( rec('710','f') ) {
192    
193  marc_indicators('111', 2, ' ');  marc_indicators('111', 2, ' ');
# Line 223  marc('110','c', Line 225  marc('110','c',
225    
226  }  }
227    
228    _debug( 0 );
229    
230  # zapisi za duplanje  # zapisi za duplanje
231  #  
232  # if ( rec('230') ) {  if ( rec('230') ) {
233  #  
234  # marc('245','a',  marc_duplicate();
235  #       rec('230','a')  
236  # );  marc('245','a',
237  #          rec('230','a')
238  # marc('245','b',  );
239  #       rec('230','e')  
240  # );  marc('245','b',
241  #          rec('230','e')
242  # marc('245','c',  );
243  #       rec('230','f')  
244  # );  marc('245','c',
245  #          rec('230','f')
246  # marc('245','n',  );
247  #       rec('230','v')  
248  # );  marc('245','n',
249  #          rec('230','v')
250  # }  );
251    
252    }

Legend:
Removed from v.573  
changed lines
  Added in v.574

  ViewVC Help
Powered by ViewVC 1.1.26