--- loncom/homework/outputtags.pm 2002/10/16 19:21:32 1.20 +++ loncom/homework/outputtags.pm 2002/10/16 20:42:22 1.21 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # tags that create controlled output # -# $Id: outputtags.pm,v 1.20 2002/10/16 19:21:32 albertel Exp $ +# $Id: outputtags.pm,v 1.21 2002/10/16 20:42:22 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -51,21 +51,20 @@ sub start_displayduedate { my $status=$Apache::inputtags::status['-1']; &Apache::lonxml::debug("got a $status in duedatebox"); if (($status =~ /CAN.*_ANSWER/) && ($target eq 'web')) { - my $format = &Apache::lonxml::get_param('format',$parstack,$safeeval); - if ($format eq '') { - &Apache::lonxml::debug("using default format"); - $format="%c"; - } +# my $format = &Apache::lonxml::get_param('format',$parstack,$safeeval); +# if ($format eq '') { +# &Apache::lonxml::debug("using default format"); +# $format="%c"; +# } my $id = $Apache::inputtags::part; my $date = &Apache::lonnet::EXT("resource.$id.duedate"); &Apache::lonxml::debug("duedatebox found $date for $id"); - if ($date) { - $result ='
Due at '. - POSIX::strftime($format,localtime($date)). - '
'; - } else { - $result ='
No due date set.
'; - } + $result ='
Due '. + &Apache::lonnavmaps::timeToHumanString($date). + '
'; +# } else { +# $result ='
No due date set.
'; +# } } elsif ( $target eq 'edit' ) { $result=&Apache::edit::tag_start($target,$token); $result.=''; @@ -84,10 +83,10 @@ sub end_displayduedate { sub start_displaytitle { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; my $result=''; - if (exists($Apache::outputtags::showonce{'displayduedate'})) { + if (exists($Apache::outputtags::showonce{'displayduetitle'})) { return ''; } else { - $Apache::outputtags::showonce{'displayduedate'}=1; + $Apache::outputtags::showonce{'displayduetitle'}=1; } if ($target eq 'web') { $result="

$Apache::lonhomework::name

";