version 1.27, 2001/01/06 16:35:36
|
version 1.30, 2001/01/10 21:49:43
|
Line 29 sub get_target {
|
Line 29 sub get_target {
|
return ('web'); |
return ('web'); |
} |
} |
} else { |
} else { |
return ('edit'); |
#return ('edit'); |
|
#edit is currently broken |
|
return ('web'); |
} |
} |
} |
} |
return (); |
return (); |
Line 72 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; |
Line 159 sub handler {
|
Line 163 sub handler {
|
&Apache::lonxml::error("<b>Unable to find <i>default_homework.lcpm</i></b>"); |
&Apache::lonxml::error("<b>Unable to find <i>default_homework.lcpm</i></b>"); |
$default=''; |
$default=''; |
} |
} |
if ( $target eq 'grade') { |
|
$Apache::lonxml::textredirection = 0; |
|
} else { |
|
$Apache::lonxml::textredirection = 1; |
|
} |
|
$result = &Apache::lonxml::xmlparse($target, $problem, |
$result = &Apache::lonxml::xmlparse($target, $problem, |
$default.&setup_vars($target),%mystyle); |
$default.&setup_vars($target),%mystyle); |
|
|