version 1.187, 2003/06/19 20:04:16
|
version 1.190, 2003/06/25 16:47:47
|
Line 149 sub setup_rndseed {
|
Line 149 sub setup_rndseed {
|
} |
} |
if ($ENV{'form.resetdata'} eq 'New Problem Variation' || |
if ($ENV{'form.resetdata'} eq 'New Problem Variation' || |
$ENV{'form.newrandomization'} eq 'New Randomization') { |
$ENV{'form.newrandomization'} eq 'New Randomization') { |
$rndseed=time; |
srand(time); |
if ($rndseed eq $ENV{'form.rndseed'}) { |
$rndseed=int(rand(2100000000)); |
srand($rndseed); |
|
$rndseed=int(rand(1000000000)); |
|
} |
|
$ENV{'form.rndseed'}=$rndseed; |
$ENV{'form.rndseed'}=$rndseed; |
delete($ENV{'form.resetdata'}); |
delete($ENV{'form.resetdata'}); |
delete($ENV{'form.newrandomization'}); |
delete($ENV{'form.newrandomization'}); |
Line 507 sub end_problem {
|
Line 504 sub end_problem {
|
} |
} |
} elsif ($status eq 'SHOW_ANSWER' || $status eq 'CANNOT_ANSWER' || |
} elsif ($status eq 'SHOW_ANSWER' || $status eq 'CANNOT_ANSWER' || |
$status eq 'UNCHECKEDOUT' ) { |
$status eq 'UNCHECKEDOUT' ) { |
if ($target ne 'tex') { |
if ($target ne 'tex' && |
|
$ENV{'form.answer_output_mode'} ne 'tex') { |
$result.="</body>\n"; |
$result.="</body>\n"; |
} |
} |
} |
} |
Line 1040 sub end_startouttext {
|
Line 1038 sub end_startouttext {
|
&Apache::edit::insertlist($target,$token). |
&Apache::edit::insertlist($target,$token). |
&Apache::edit::end_row(). |
&Apache::edit::end_row(). |
&Apache::edit::start_spanning_row()."\n" |
&Apache::edit::start_spanning_row()."\n" |
.'<table><tr><td>'. |
. &Apache::loncommon::helpLatexCheatsheet () . |
&Apache::loncommon::help_open_topic("Greek_Symbols", |
|
'Greek Symbols', |
|
undef,undef,600) |
|
.'</td><td>'. |
|
&Apache::loncommon::help_open_topic("Other_Symbols", |
|
'Other Symbols', |
|
undef,undef,600) |
|
.'</td></tr></table>'. |
|
&Apache::edit::editfield($token->[1],$text,"",80,4); |
&Apache::edit::editfield($token->[1],$text,"",80,4); |
} |
} |
if ($target eq 'modified') { |
if ($target eq 'modified') { |