--- trunk/parse_format.pm 2003/07/13 13:42:17 92 +++ trunk/parse_format.pm 2003/07/14 17:08:37 105 @@ -59,7 +59,7 @@ # this is EBSCO special to support numeric subfield in # form of 856#3 if ($format =~ s/^(\d\d\d)#*(\w?)//) { - my $tmp = cnv_cp($codepage,get_sf($row,$1,$2,$i)); + my $tmp = cnv_cp($codepage,&$func($row,$1,$2,$i)); if ($tmp) { $display .= $prefix.$tmp; $swish .= $tmp." "; @@ -70,7 +70,7 @@ # (as opposed to 010 and 011) so they are strictly listed # here } elsif ($format =~ s/^(1[01])//) { - my $tmp = cnv_cp($codepage,get_sf($row,$1,undef,$i)); + my $tmp = cnv_cp($codepage,&$func($row,$1,undef,$i)); if ($tmp) { $display .= $prefix.$tmp; $swish .= $tmp." ";