|
version 1.119, 2005/10/11 21:16:37
|
version 1.121, 2005/10/11 22:04:27
|
|
Line 1644 sub render {
|
Line 1644 sub render {
|
| $result .= "</select> :\n"; |
$result .= "</select> :\n"; |
| |
|
| $result .= "<select $onclick name='${var}minute'>\n"; |
$result .= "<select $onclick name='${var}minute'>\n"; |
| for my $i ((0,15,30,45,59,undef,1..59)) { |
my $selected=0; |
| |
for my $i ((0,15,30,45,59,undef,0..59)) { |
| my $printedMinute = $i; |
my $printedMinute = $i; |
| if (defined($i) && $i < 10) { |
if (defined($i) && $i < 10) { |
| $printedMinute = "0" . $printedMinute; |
$printedMinute = "0" . $printedMinute; |
| } |
} |
| if ($date->min == $i) { |
if (!$selected && $date->min == $i) { |
| $result .= "<option selected='selected'>"; |
$result .= "<option selected='selected'>"; |
| |
$selected=1; |
| } else { |
} else { |
| $result .= "<option>"; |
$result .= "<option>"; |
| } |
} |
|
Line 1659 sub render {
|
Line 1661 sub render {
|
| $result .= "</select>\n"; |
$result .= "</select>\n"; |
| } |
} |
| if ($self->{'anytime'}) { |
if ($self->{'anytime'}) { |
| $result.=(<<CHECK); |
$result.=(<<CHECK); |
| <script type="text/javascript"> |
<script type="text/javascript"> |
| // <!-- |
// <!-- |
| function updateCheck(form,name,value) { |
function updateCheck(form,name,value) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonhelper.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface