version 1.163, 2003/04/03 21:08:33
|
version 1.164, 2003/04/03 21:58:09
|
Line 279 sub start_problem {
|
Line 279 sub start_problem {
|
$Apache::lonhomework::type=&Apache::lonnet::EXT('resource.0.type'); |
$Apache::lonhomework::type=&Apache::lonnet::EXT('resource.0.type'); |
&Apache::lonxml::debug("Found this to be of type :$Apache::lonhomework::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+)$/) { |
$Apache::lonhomework::type=$1; |
$Apache::lonhomework::type=$1; |
Line 323 sub start_problem {
|
Line 323 sub start_problem {
|
$form_tag_start.='<input type="hidden" name="rndseed" value="'. |
$form_tag_start.='<input type="hidden" name="rndseed" value="'. |
$rndseed.'" />'. |
$rndseed.'" />'. |
'<input type="submit" name="resetdata" |
'<input type="submit" name="resetdata" |
value="New Problem Variation" />'; |
value="New Problem Variation" />'. |
|
'<input type="hidden" name="username" |
|
value="'.$ENV{'form.username'}.'" />'; |
} |
} |
($status,$accessmsg) = &Apache::lonhomework::check_access('0'); |
($status,$accessmsg) = &Apache::lonhomework::check_access('0'); |
push (@Apache::inputtags::status,$status); |
push (@Apache::inputtags::status,$status); |