loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.86, 2002/03/28 22:53:55	version 1.87, 2002/03/29 18:32:46
Line 174 sub start_problem {	Line 174 sub start_problem {
$Apache::inputtags::part='0';	$Apache::inputtags::part='0';
@Apache::inputtags::responselist = ();	@Apache::inputtags::responselist = ();
@Apache::inputtags::previous=();	@Apache::inputtags::previous=();
&initialize_storage();	if ($target ne 'analyze') {
if ($target eq 'web') {	&initialize_storage();
&Apache::lonhomework::showhash(%Apache::lonhomework::history);	if ($target eq 'web') {
	&Apache::lonhomework::showhash(%Apache::lonhomework::history);
	}
	$Apache::lonhomework::type=&Apache::lonnet::EXT('resource.0.type');
	&Apache::lonxml::debug("Found this to be of type :$Apache::lonhomework::type:");
}	}
$Apache::lonhomework::type=&Apache::lonnet::EXT('resource.0.type');
&Apache::lonxml::debug("Found this to be of type :$Apache::lonhomework::type:");
if ($Apache::lonhomework::type eq '') {	if ($Apache::lonhomework::type eq '') {
my $uri=$ENV{'request.uri'};	my $uri=$ENV{'request.uri'};
if ($uri=~/\.(\w+)$/) {	if ($uri=~/\.(\w+)$/) {