version 1.29, 2001/01/09 19:50:14
|
version 1.30, 2001/01/10 21:49:43
|
Line 74 sub check_date {
|
Line 74 sub check_date {
|
&Apache::lonxml::debug("found :$date: for :$temp:"); |
&Apache::lonxml::debug("found :$date: for :$temp:"); |
if ($date eq '') { |
if ($date eq '') { |
$date = "an unknown date"; $passed = 0; |
$date = "an unknown date"; $passed = 0; |
|
} elsif ($date eq 'con_lost') { |
|
$date = "an indeterminate date"; $passed = 0; |
} else { |
} else { |
if (time < $date) { $passed = 0; } else { $passed = 1; } |
if (time < $date) { $passed = 0; } else { $passed = 1; } |
$date = localtime $date; |
$date = localtime $date; |