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

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

revision 875 by dpavlin, Sun Apr 1 12:26:25 2007 UTC revision 876 by dpavlin, Thu Aug 23 19:21:23 2007 UTC
# Line 1  Line 1 
1    
2  if ( rec('200','a') ) {  if ( rec('200','a') ) {
3    
 marc('035','6',  
 join_with('',  
                 config(),  
                 '-L-',  
                 rec('000')  
         )  
 );  
   
   
 marc('020','a',  
         rec('10')  
 );  
   
   
 marc('022','a',  
         rec('11','a')  
 );  
   
   
4  marc_indicators('245', 1, 0);  marc_indicators('245', 1, 0);
5    
6  marc('245','a',  marc('245','a',
7          rec('200','a')          first( rec('200','a') )
8  );  );
9    
 marc('260','c',  
         rec('210','d')  
           
 );  
   
 marc('686','a',  
         first(rec('686'))  
 );  
10    
11  }  }
Legend:
Removed from v.875  
changed lines
  Added in v.876
  ViewVC Help
Powered by ViewVC 1.1.26