/[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.19 by dpavlin, Wed Jul 17 18:37:37 2002 UTC revision 1.20 by dpavlin, Wed Jul 17 19:33:19 2002 UTC
# Line 315  foreach (@isis_dirs) { Line 315  foreach (@isis_dirs) {
315                  push @isis_dbs,"$common::isis_data/$db_dir/$_/AMS/AMS";                  push @isis_dbs,"$common::isis_data/$db_dir/$_/AMS/AMS";
316          }          }
317          if (-e "$common::isis_data/$db_dir/$_/ARTI") {          if (-e "$common::isis_data/$db_dir/$_/ARTI") {
318                  push @isis_dbs,"$common::isis_data/$db_dir/$_/ARTI/ARTI";  #               push @isis_dbs,"$common::isis_data/$db_dir/$_/ARTI/ARTI";
319          }          }
320  }  }
321    
# Line 563  foreach my $isis_db (@isis_dbs) { Line 563  foreach my $isis_db (@isis_dbs) {
563                  $tmp =~ s/m1/mjesečnik/;                  $tmp =~ s/m1/mjesečnik/;
564                  $tmp =~ s/m2/polumjesečnik/;                  $tmp =~ s/m2/polumjesečnik/;
565                  $tmp =~ s/nr/neredovito/;                  $tmp =~ s/nr/neredovito/;
566                    $tmp =~ s/g4/četiri puta godišnje/;
567                  $bib .= c_iso_852($tmp);                  $bib .= c_iso_852($tmp);
568                  $bib .= isis_to_bib($row,'992','%992');                  $bib .= isis_to_bib($row,'992','%992');
569    

Legend:
Removed from v.1.19  
changed lines
  Added in v.1.20

  ViewVC Help
Powered by ViewVC 1.1.26