version 1.214, 2004/04/21 18:04:55
|
version 1.215, 2004/04/22 20:05:18
|
Line 1825 sub update_seconds {
|
Line 1825 sub update_seconds {
|
my ($r) = @_; |
my ($r) = @_; |
my $time = &time_left(); |
my $time = &time_left(); |
if (($last_time-$time) > 0) { |
if (($last_time-$time) > 0) { |
&Apache::lonnet::logthis('time left = '.$time.' last time = '.$time); |
|
&Apache::lonnet::logthis('updating time'); |
|
$r->print("<script>". |
$r->print("<script>". |
"document.statusform.seconds.value = '$time'". |
"document.statusform.seconds.value = '$time'". |
"</script>\n"); |
"</script>\n"); |