version 1.35, 2003/02/13 23:48:27
|
version 1.37, 2003/04/02 18:51:11
|
Line 53 sub start_hintgroup {
|
Line 53 sub start_hintgroup {
|
if ( $numtries < $hinttries ) { |
if ( $numtries < $hinttries ) { |
$skiptoend='1'; |
$skiptoend='1'; |
} else { |
} else { |
if ($target eq 'web') {$result='<table bgcolor="#dddddd"><tr><td>';} |
if ($target eq 'web' && $Apache::lonhomework::type ne 'exam') { |
|
$result='<table bgcolor="#dddddd"><tr><td>'; |
|
} elsif ($Apache::lonhomework::type eq 'exam') { |
|
&Apache::lonxml::startredirection; |
|
} |
} |
} |
if ($skiptoend) { |
if ($skiptoend) { |
&Apache::lonxml::get_all_text("/hintgroup",$parser); |
&Apache::lonxml::get_all_text("/hintgroup",$parser); |
Line 76 sub end_hintgroup {
|
Line 80 sub end_hintgroup {
|
my $hinttries=&Apache::lonnet::EXT("resource.$id.hinttries"); |
my $hinttries=&Apache::lonnet::EXT("resource.$id.hinttries"); |
if ( $hinttries eq '') { $hinttries = 1; } |
if ( $hinttries eq '') { $hinttries = 1; } |
&Apache::lonxml::debug("found :$id:$numtries:$hinttries:"); |
&Apache::lonxml::debug("found :$id:$numtries:$hinttries:"); |
if ( $numtries >= $hinttries ) { |
if ( $numtries >= $hinttries && $Apache::lonhomework::type ne 'exam') { |
$result='</td></tr></table>'; |
$result='</td></tr></table>'; |
|
} elsif ($Apache::lonhomework::type eq 'exam') { |
|
my $garbage = &Apache::lonxml::endredirection; |
} |
} |
} elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |
$result.=&Apache::edit::end_table(); |
$result.=&Apache::edit::end_table(); |
Line 98 sub start_numericalhint {
|
Line 104 sub start_numericalhint {
|
$result.=&Apache::edit::text_arg('Name:','name',$token); |
$result.=&Apache::edit::text_arg('Name:','name',$token); |
$result.=&Apache::edit::text_arg('Answer:','answer',$token); |
$result.=&Apache::edit::text_arg('Answer:','answer',$token); |
if ($token->[1] eq 'numericalhint') { |
if ($token->[1] eq 'numericalhint') { |
$result.=&Apache::edit::text_arg('Unit:','unit',$token,5); |
$result.=&Apache::edit::text_arg('Unit:','unit',$token,5). |
$result.=&Apache::edit::text_arg('Format:','format',$token,4); |
&Apache::loncommon::help_open_topic('Physical_Units'); |
|
$result.=&Apache::edit::text_arg('Format:','format',$token,4). |
|
&Apache::loncommon::help_open_topic('Numerical_Response_Format'); |
} elsif ($token->[1] eq 'stringhint') { |
} elsif ($token->[1] eq 'stringhint') { |
$result.=&Apache::edit::select_arg('Type:','type',['cs','ci','mc'],$token); |
$result.=&Apache::edit::select_arg('Type:','type',['cs','ci','mc'],$token); |
} elsif ($token->[1] eq 'formulahint') { |
} elsif ($token->[1] eq 'formulahint') { |