loncom/imspackages/imsimport.pm - diff

Return to imsimport.pm CVS log

Up to [LON-CAPA] / loncom / imspackages

version 1.28, 2009/04/04 21:45:53	version 1.29, 2009/04/23 09:40:46
Line 762 sub handler {	Line 762 sub handler {
$r->print(&Apache::loncommon::start_page($title, $javascript));	$r->print(&Apache::loncommon::start_page($title, $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><font color=red>'.&mt('Co-Author').': '.$uname.	$r->print('<h3><span class="LC_warning">'
&mt(' at ').$udom.'</font></h3>');	.&mt('Co-Author [_1]:[_2]',$uname,$udom)
	.'</span></h3>'
	);
}	}
if ($env{'form.phase'} eq 'two') {	if ($env{'form.phase'} eq 'two') {
my $flag = &Apache::lonupload::phasetwo($r,$fn,$uname,$udom,'imsimport');	my $flag = &Apache::lonupload::phasetwo($r,$fn,$uname,$udom,'imsimport');