version 1.479, 2006/11/30 22:29:03
|
version 1.481, 2006/12/01 00:28:14
|
Line 5136 sub record_sep {
|
Line 5136 sub record_sep {
|
$i++; |
$i++; |
} |
} |
} else { |
} else { |
my @allfields=split(/\,/,$record); |
my @allfields; |
|
&Apache::lonnet::logthis("file type is ".$env{'form.upfiletype'}); |
|
if ($env{'form.upfiletype'} eq 'semisv') { |
|
@allfields=split(/;/,$record); |
|
} else { |
|
@allfields=split(/\,/,$record); |
|
} |
my $i=0; |
my $i=0; |
my $j; |
my $j; |
for ($j=0;$j<=$#allfields;$j++) { |
for ($j=0;$j<=$#allfields;$j++) { |
Line 5174 the file type.
|
Line 5180 the file type.
|
sub upfile_select_html { |
sub upfile_select_html { |
my %Types = ( |
my %Types = ( |
csv => &mt('CSV (comma separated values, spreadsheet)'), |
csv => &mt('CSV (comma separated values, spreadsheet)'), |
|
semisv => &mt('Semicolon separated values'), |
space => &mt('Space separated'), |
space => &mt('Space separated'), |
tab => &mt('Tabulator separated'), |
tab => &mt('Tabulator separated'), |
# xml => &mt('HTML/XML'), |
# xml => &mt('HTML/XML'), |