loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.479, 2006/11/30 22:29:03	version 1.480, 2006/12/01 00:26:07
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') {
	&Apache::lonnet::logthis("splitting on ; ");
	@allfields=split(/;/,$record);
	} else {
	&Apache::lonnet::logthis("splitting on , ");
	@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 5182 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'),