loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.291, 2011/07/28 03:14:04	version 1.293, 2011/09/09 23:42:39
Line 2344 sub file_submissionchk_js {	Line 2344 sub file_submissionchk_js {
&mt('Continue submission and overwrite the file(s)?');	&mt('Continue submission and overwrite the file(s)?');
my $delfilewarn = &mt('You have indicated you wish to remove some files previously included in your submission.').'\\n'.	my $delfilewarn = &mt('You have indicated you wish to remove some files previously included in your submission.').'\\n'.
&mt('Continue submission with these files removed?');	&mt('Continue submission with these files removed?');
my ($turninpathtext,$multtext);	my ($turninpathtext,$multtext,$arrayindexofjs);
if (ref($turninpaths) eq 'HASH') {	if (ref($turninpaths) eq 'HASH') {
foreach my $key (sort(keys(%{$turninpaths}))) {	foreach my $key (sort(keys(%{$turninpaths}))) {
$turninpathtext .= " if (prefix == '$key') {\n".	$turninpathtext .= " if (prefix == '$key') {\n".
Line 2361 sub file_submissionchk_js {	Line 2361 sub file_submissionchk_js {
}	}
}	}
$multtext .= " return '';\n";	$multtext .= " return '';\n";

	$arrayindexofjs = &Apache::loncommon::javascript_array_indexof();
return <<"ENDSCRIPT";	return <<"ENDSCRIPT";
<script type="text/javascript">	<script type="text/javascript">
// <![CDATA[	// <![CDATA[
Line 2573 $turninpathtext	Line 2575 $turninpathtext
// ]]>	// ]]>
</script>	</script>

	$arrayindexofjs

ENDSCRIPT	ENDSCRIPT
}	}