--- loncom/homework/outputtags.pm 2005/12/12 22:10:32 1.45 +++ loncom/homework/outputtags.pm 2006/10/17 15:11:12 1.49 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # tags that create controlled output # -# $Id: outputtags.pm,v 1.45 2005/12/12 22:10:32 albertel Exp $ +# $Id: outputtags.pm,v 1.49 2006/10/17 15:11:12 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -69,11 +69,11 @@ sub start_displayduedate { my $style = &Apache::lonxml::get_param('style',$parstack,$safeeval); my $format = &Apache::lonxml::get_param('format', $parstack, $safeeval); if (!$format) { - $format = '%c'; + $format = undef; } if (($status =~ /CAN.*_ANSWER/)) { my $id = $Apache::inputtags::part; - my $date = &Apache::lonnet::EXT("resource.$id.duedate"); + my $date = &Apache::lonhomework::due_date($id); &Apache::lonxml::debug("duedatebox found $date for $id"); # Only show the due date if the current date is @@ -169,7 +169,7 @@ sub end_displaytitle { sub multipart { my ($uri)=@_; if (!defined($uri)) { $uri=$env{'request.uri'}; } - my ($symb)=&Apache::lonxml::whichuser(); + my ($symb)=&Apache::lonnet::whichuser(); my @parts; my $metadata = &Apache::lonnet::metadata($uri,'packages'); @@ -236,7 +236,7 @@ sub end_displayweight { sub start_displaystudentphoto { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; my $result; - my (undef,undef,$domain,$user) = &Apache::lonxml::whichuser(); + my (undef,undef,$domain,$user) = &Apache::lonnet::whichuser(); if ($target eq 'web' && $user eq $env{'user.name'}) { my $url=&Apache::lonnet::studentphoto($domain,$user,"gif"); my $args;