/[webpac-proto]/isis2stream.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 /isis2stream.pl

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

revision 1.11 by dpavlin, Mon Jun 24 15:36:52 2002 UTC revision 1.12 by dpavlin, Mon Jun 24 16:16:13 2002 UTC
# Line 346  foreach my $isis_db (@isis_dbs) { Line 346  foreach my $isis_db (@isis_dbs) {
346                  $headline =~ s/\s+$//g;                  $headline =~ s/\s+$//g;
347    
348                  # author                  # author
349                  $bib .= isis_to_bib($row,'700','%700+','*',2,'<');                  $bib .= isis_to_bib($row,'700','%700+','*',2,'>',', ');
350                  $bib .= isis_to_bib($row,'701','%700+','*',2,'<');                  $bib .= isis_to_bib($row,'701','%700+','*',2,'>',', ');
351                  $bib .= isis_to_bib($row,'710','%700+','*',2,'<');                  $bib .= isis_to_bib($row,'710','%700+','*',2,'>',', ');
352                  $bib .= isis_to_bib($row,'711','%700+','*',2,'<');                  $bib .= isis_to_bib($row,'711','%700+','*',2,'>',', ');
353                  $bib .= isis_to_bib($row,'503','%700+','*',2,'<');                  $bib .= isis_to_bib($row,'503','%700+','*',2,'>',', ');
354    
355                  $mps .= isis_to_mps($row,'700',1);                  $mps .= isis_to_mps($row,'700',1);
356                  $mps .= isis_to_mps($row,'701',1);                  $mps .= isis_to_mps($row,'701',1);

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

  ViewVC Help
Powered by ViewVC 1.1.26