--- isis2stream.pl 2002/06/24 18:07:26 1.16 +++ isis2stream.pl 2002/06/25 13:42:54 1.17 @@ -350,11 +350,12 @@ $bib .= isis_to_bib($row,'701','%700+','ab',undef,'>',', '); $bib .= isis_to_bib($row,'701','%700+','cd',undef,'>',', '); - my $tmp = isis_sf($row,'710','abc', '', '', (' : ',', ')); + my $tmp; + $tmp = isis_sf($row,'710','abc', '', '', (' : ',', ')); $tmp .= isis_sf($row,'710','dfe', ' (', ')', ('', ' ; ',' ; ')); $bib .= "%700+ $tmp\n" if ($tmp); - my $tmp = isis_sf($row,'711','abc', '', '', (' : ',', ')); + $tmp = isis_sf($row,'711','abc', '', '', (' : ',', ')); $tmp .= isis_sf($row,'711','dfe', ' (', ')', ('', ' ; ',' ; ')); $bib .= "%700+ $tmp\n" if ($tmp); @@ -394,7 +395,6 @@ $mps .= isis_to_mps($row,'233',2,"ae"); - my $tmp; $tmp = isis_sf($row,'230','v'). isis_sf($row,'230','a',' : '). isis_sf($row,'250',undef,'. - '). @@ -480,9 +480,9 @@ $bib .= isis_to_bib($row,'610','%610'); $mps .= isis_to_mps($row,'610',8); - $bib .= isis_to_bib($row,'675','%675+'); + $bib .= isis_to_bib($row,'675','%675+','a'); $mps .= isis_to_mps($row,'675',9); - $bib .= isis_to_bib($row,'686','%675+'); + $bib .= isis_to_bib($row,'686','%675+','a'); $mps .= isis_to_mps($row,'686',10); $bib .= isis_to_bib($row,'990','%990');