version 1.58, 2010/04/12 16:19:34
|
version 1.59, 2010/04/12 16:28:22
|
Line 1097 sub CreateInterface {
|
Line 1097 sub CreateInterface {
|
foreach ('HTML','Excel','CSV') { |
foreach ('HTML','Excel','CSV') { |
$output_selector .= ' <option value="'.lc($_).'"'; |
$output_selector .= ' <option value="'.lc($_).'"'; |
if ($env{'form.output'} eq lc($_)) { |
if ($env{'form.output'} eq lc($_)) { |
$output_selector .= ' selected '; |
$output_selector .= ' selected="selected"'; |
} |
} |
$output_selector .='>'.&mt($_).'</option>'.$/; |
$output_selector .='>'.&mt($_).'</option>'.$/; |
} |
} |
Line 1106 sub CreateInterface {
|
Line 1106 sub CreateInterface {
|
## Environment variable initialization |
## Environment variable initialization |
my $Str = ''; |
my $Str = ''; |
$Str .= &Apache::lonhtmlcommon::breadcrumbs('Student Submission Reports'); |
$Str .= &Apache::lonhtmlcommon::breadcrumbs('Student Submission Reports'); |
$Str .= '<p>'; |
$Str .= '<br />'; |
$Str .= &Apache::loncommon::start_data_table(); |
$Str .= &Apache::loncommon::start_data_table(); |
$Str .= &Apache::loncommon::start_data_table_header_row(); |
$Str .= &Apache::loncommon::start_data_table_header_row(); |
$Str .= '<th>'.&mt('Sections').'</th>'; |
$Str .= '<th>'.&mt('Sections').'</th>'; |
Line 1190 sub CreateInterface {
|
Line 1190 sub CreateInterface {
|
'<input type="text" name="stats_status"' |
'<input type="text" name="stats_status"' |
.' size="60" value="" readonly="readonly" />') |
.' size="60" value="" readonly="readonly" />') |
.'</span></p>'; |
.'</span></p>'; |
$Str .= '</p>'; |
|
## |
## |
return $Str; |
return $Str; |
} |
} |