loncom/publisher/lonupload.pm - diff

Return to lonupload.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.43, 2008/12/19 03:57:24	version 1.45, 2009/05/06 16:19:50
Line 191 sub phaseone {	Line 191 sub phaseone {
'<br />'.	'<br />'.
'<br />'.&mt('Choose file type:').'	'<br />'.&mt('Choose file type:').'
<select name="filetype">	<select name="filetype">
<option value="standard" selected>'.&mt('Regular file').'	<option value="standard" selected="selected">'.&mt('Regular file').'
<option value="testbank">'.&mt('Testbank file').'	<option value="testbank">'.&mt('Testbank file').'
<option value="imsimport">'.&mt('IMS package').'	<option value="imsimport">'.&mt('IMS package').'
</select>'.&Apache::loncommon::help_open_topic("Uploading_File_Options").'	</select>'.&Apache::loncommon::help_open_topic("Uploading_File_Options").'
Line 444 function verifyForm() {	Line 444 function verifyForm() {
$javascript));	$javascript));

if (($uname ne $env{'user.name'}) \|\| ($udom ne $env{'user.domain'})) {	if (($uname ne $env{'user.name'}) \|\| ($udom ne $env{'user.domain'})) {
$r->print('<h3><span class="LC_error">'.&mt('Co-Author').': '.$uname.	$r->print('<p class="LC_warning">'
&mt(' at ').$udom.'</span></h3>');	.&mt('Co-Author [_1]:[_2]',$uname,$udom)
	.'</p>'
	);
}	}

if ($env{'form.phase'} eq 'three') {	if ($env{'form.phase'} eq 'three') {