version 1.132, 2008/10/30 17:45:25
|
version 1.135, 2008/12/12 10:01:30
|
Line 1558 sub OR_time_analysis {
|
Line 1558 sub OR_time_analysis {
|
$table .= '<tr><td colspan="4" align="center">'. |
$table .= '<tr><td colspan="4" align="center">'. |
&mt('Start time: [_1]',$startdateform).'<br />'. |
&mt('Start time: [_1]',$startdateform).'<br />'. |
&mt('End time: [_1]',$enddateform).'</td></tr>'.$/; |
&mt('End time: [_1]',$enddateform).'</td></tr>'.$/; |
$table.= '<tr><td colspan="4"> </td></tr>'.$/; |
$table.= '<tr><td colspan="4"> </td></tr>'.$/; |
} |
} |
$table .= '</table>'; |
$table .= '</table>'; |
# |
# |
Line 1909 sub CreateInterface {
|
Line 1909 sub CreateInterface {
|
$showprob_checkbox .= 'checked="checked" '; |
$showprob_checkbox .= 'checked="checked" '; |
} |
} |
$showprob_checkbox.= ' />'; |
$showprob_checkbox.= ' />'; |
$Str.= '<nobr><label>'. |
$Str.= '<span class="LC_nobreak"><label>'. |
&mt('Show problem [_1]',$showprob_checkbox). |
&mt('Show problem [_1]',$showprob_checkbox). |
'</label></nobr><br />'; |
'</label></span><br />'; |
## |
## |
my $analyze_selector = '<select name="AnalyzeOver" >'; |
my $analyze_selector = '<select name="AnalyzeOver" >'; |
$analyze_selector .= '<option value="tries" '; |
$analyze_selector .= '<option value="tries" '; |
Line 1925 sub CreateInterface {
|
Line 1925 sub CreateInterface {
|
$analyze_selector .= ' selected ' if ($env{'form.AnalyzeOver'} eq 'time'); |
$analyze_selector .= ' selected ' if ($env{'form.AnalyzeOver'} eq 'time'); |
$analyze_selector .= '>'.&mt('Time').'</option>'; |
$analyze_selector .= '>'.&mt('Time').'</option>'; |
$analyze_selector .= '</select>'; |
$analyze_selector .= '</select>'; |
$Str .= '<nobr><label>'. |
$Str .= '<span class="LC_nobreak"><label>'. |
&mt('Analyze Over [_1] [_2]', |
&mt('Analyze Over [_1] [_2]', |
$analyze_selector, |
$analyze_selector, |
&Apache::loncommon::help_open_topic('Analysis_Analyze_Over')). |
&Apache::loncommon::help_open_topic('Analysis_Analyze_Over')). |
'</label></nobr><br />'.$/; |
'</label></span><br />'.$/; |
## |
## |
my $numplots_selector = '<select name="NumPlots">'; |
my $numplots_selector = '<select name="NumPlots">'; |
if (! exists($env{'form.NumPlots'}) |
if (! exists($env{'form.NumPlots'}) |
Line 1942 sub CreateInterface {
|
Line 1942 sub CreateInterface {
|
if ($env{'form.NumPlots'} == $i) { $numplots_selector.=' selected="selected" '; } |
if ($env{'form.NumPlots'} == $i) { $numplots_selector.=' selected="selected" '; } |
$numplots_selector .= '>'.$i.'</option>'; |
$numplots_selector .= '>'.$i.'</option>'; |
} |
} |
$numplots_selector .= '</select></nobr><br />'; |
$numplots_selector .= '</select>'; |
$Str .= '<nobr><label>'.&mt('Number of Plots [_1]',$numplots_selector). |
$Str .= '<span class="LC_nobreak"><label>'.&mt('Number of Plots [_1]',$numplots_selector). |
'</label></nobr>'; |
'</label></span><br />'; |
## |
## |
$Str .= '</td>'; |
$Str .= '</td>'; |
## |
## |