version 1.50, 2003/12/10 23:09:26
|
version 1.53, 2004/01/08 19:20:12
|
Line 49 my @SubmitButtons = ({ name => 'ProblemA
|
Line 49 my @SubmitButtons = ({ name => 'ProblemA
|
{ name => 'updatecaches', |
{ name => 'updatecaches', |
text => 'Update Student Data' }, |
text => 'Update Student Data' }, |
{ name => 'SelectAnother', |
{ name => 'SelectAnother', |
text => 'Choose a different resource' }, |
text => 'Choose a different Problem' }, |
{ name => 'ExcelOutput', |
{ name => 'ExcelOutput', |
text => 'Produce Excel Output' }); |
text => 'Produce Excel Output' }); |
|
|
Line 1403 sub CreateInterface {
|
Line 1403 sub CreateInterface {
|
{ # These braces are here to organize the code, not scope it. |
{ # These braces are here to organize the code, not scope it. |
{ |
{ |
$Str .= '<nobr>'.&mt('Analyze Over '); |
$Str .= '<nobr>'.&mt('Analyze Over '); |
|
$Str .= &Apache::loncommon::help_open_topic |
|
('Analysis_Analyze_Over'); |
$Str .='<select name="AnalyzeOver" >'; |
$Str .='<select name="AnalyzeOver" >'; |
$Str .= '<option value="Tries" '; |
$Str .= '<option value="Tries" '; |
if (! exists($ENV{'form.AnalyzeOver'}) || |
if (! exists($ENV{'form.AnalyzeOver'}) || |
Line 1414 sub CreateInterface {
|
Line 1416 sub CreateInterface {
|
$Str .= '<option value="Time" '; |
$Str .= '<option value="Time" '; |
$Str .= ' selected ' if ($ENV{'form.AnalyzeOver'} eq 'Time'); |
$Str .= ' selected ' if ($ENV{'form.AnalyzeOver'} eq 'Time'); |
$Str .= '>'.&mt('Time').'</option>'; |
$Str .= '>'.&mt('Time').'</option>'; |
$Str .= '</select></nobr><br />'; |
$Str .= '</select>'; |
|
$Str .= '</nobr><br />'; |
} |
} |
{ |
{ |
$Str .= '<nobr>'.&mt('Analyze as '); |
$Str .= '<nobr>'.&mt('Analyze as '); |
|
$Str .= &Apache::loncommon::help_open_topic |
|
('Analysis_Analyze_as'); |
$Str .='<select name="AnalyzeAs" >'; |
$Str .='<select name="AnalyzeAs" >'; |
$Str .= '<option value="Concepts" '; |
$Str .= '<option value="Concepts" '; |
if (! exists($ENV{'form.AnalyzeAs'}) || |
if (! exists($ENV{'form.AnalyzeAs'}) || |
Line 1433 sub CreateInterface {
|
Line 1438 sub CreateInterface {
|
} |
} |
{ |
{ |
$Str .= '<br /><nobr>'.&mt('Number of Plots:'); |
$Str .= '<br /><nobr>'.&mt('Number of Plots:'); |
|
$Str .= &Apache::loncommon::help_open_topic |
|
('Analysis_num_plots'); |
$Str .= '<select name="NumPlots">'; |
$Str .= '<select name="NumPlots">'; |
if (! exists($ENV{'form.NumPlots'}) |
if (! exists($ENV{'form.NumPlots'}) |
|| $ENV{'form.NumPlots'} < 1 |
|| $ENV{'form.NumPlots'} < 1 |