loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.184, 2004/11/29 22:13:34	version 1.186, 2004/12/03 21:47:38
Line 385 sub setuppermissions {	Line 385 sub setuppermissions {
'/'.$ENV{'request.course.sec'});	'/'.$ENV{'request.course.sec'});
}	}
$Apache::lonhomework::viewgrades = $viewgrades;	$Apache::lonhomework::viewgrades = $viewgrades;
	if ($Apache::lonhomework::browse eq 'F' &&
	$ENV{'form.devalidatecourseresdata'} eq 'on') {
	my (undef,$courseid) = &Apache::lonxml::whichuser();
	&Apache::lonnet::devalidatecourseresdata($ENV{"course.$courseid.num"},
	$ENV{"course.$courseid.domain"});
	}
return ''	return ''
}	}

Line 714 sub newproblem {	Line 720 sub newproblem {
$errormsg='<p><font color="red">'.&mt('You did not select a template.').'</font></p>'."\n";	$errormsg='<p><font color="red">'.&mt('You did not select a template.').'</font></p>'."\n";
}	}
my $instructions;	my $instructions;
my $bodytag=&Apache::loncommon::bodytag(undef,undef,undef,1);	my $bodytag=&Apache::loncommon::bodytag(undef,undef,undef,
	($ENV{'environment.remote'} ne 'off'));
if ($templatelist) { $instructions=&mt(", select a template from the pull-down menu below.").'<br />'.&mt("Then");}	if ($templatelist) { $instructions=&mt(", select a template from the pull-down menu below.").'<br />'.&mt("Then");}
my %lt=&Apache::lonlocal::texthash( 'create' => 'Creating a new',	my %lt=&Apache::lonlocal::texthash( 'create' => 'Creating a new',
'resource' => 'resource',	'resource' => 'resource',