version 1.145, 2007/10/03 17:39:13
|
version 1.146, 2007/12/20 13:57:13
|
Line 372 sub CreateInterface {
|
Line 372 sub CreateInterface {
|
$Str .= ' 'x5; |
$Str .= ' 'x5; |
$Str .= |
$Str .= |
&mt('Status [_1]', |
&mt('Status [_1]', |
'<input type="text" name="stats_status" size="60" value="" />'); |
'<input type="text" name="stats_status" size="60" value="" readonly="readonly" />'); |
$Str .= '<br />'; |
$Str .= '<br />'; |
return $Str; |
return $Str; |
} |
} |
Line 671 sub html_initialize {
|
Line 671 sub html_initialize {
|
# If we're showing links, show a checkbox to open in new |
# If we're showing links, show a checkbox to open in new |
# windows. |
# windows. |
if ($show_links ne 'no') { |
if ($show_links ne 'no') { |
|
my $labeltext = &mt('Show links in new window:'); |
$r->print(<<NEW_WINDOW_CHECKBOX); |
$r->print(<<NEW_WINDOW_CHECKBOX); |
<script type="text/javascript">new_window = true;</script> |
<script type="text/javascript">new_window = true;</script> |
<p><label>Show links in new window: |
<p><label>$labeltext |
<input type="checkbox" checked="1" onclick="new_window=this.checked" /> |
<input type="checkbox" checked="1" onclick="new_window=this.checked" /> |
</label></p> |
</label></p> |
NEW_WINDOW_CHECKBOX |
NEW_WINDOW_CHECKBOX |
Line 684 NEW_WINDOW_CHECKBOX
|
Line 685 NEW_WINDOW_CHECKBOX
|
" ".localtime(time)."</h3>"); |
" ".localtime(time)."</h3>"); |
# |
# |
if ($chosen_output->{'base'} !~ /^final table/) { |
if ($chosen_output->{'base'} !~ /^final table/) { |
$r->print("<h3>".$chosen_output->{'shortdesc'}."</h3>"); |
$r->print("<h3>".&mt($chosen_output->{'shortdesc'})."</h3>"); |
} |
} |
my $Str = "<pre>\n"; |
my $Str = "<pre>\n"; |
# First, the @StudentData fields need to be listed |
# First, the @StudentData fields need to be listed |