--- loncom/homework/outputtags.pm 2001/01/11 16:11:16 1.2 +++ loncom/homework/outputtags.pm 2001/01/15 14:57:13 1.5 @@ -13,7 +13,7 @@ sub start_displayduedate { my $result; my $status=$Apache::inputtags::status['-1']; &Apache::lonxml::debug("got a $status in duedatebox"); - if ($status =~ /CAN.*_ANSWER/) { + if (($status =~ /CAN.*_ANSWER/) && ($target eq 'web')) { my $args =''; if ( $#$parstack > -1 ) { $args=$$parstack[$#$parstack]; } my $format = &Apache::run::run("{$args;".'return $format}',$safeeval); @@ -24,9 +24,13 @@ sub start_displayduedate { my $id = $Apache::inputtags::part; my $date = &Apache::lonnet::EXT("resource.$id.duedate"); &Apache::lonxml::debug("duedatebox found $date for $id"); - $result ='
Due at '. - POSIX::strftime($format,localtime($date)). - '
'; + if ($date) { + $result ='
Due at '. + POSIX::strftime($format,localtime($date)). + '
'; + } else { + $result ='
No due date set.
'; + } } return $result; } @@ -36,7 +40,11 @@ sub end_displayduedate { sub start_displaytitle { my ($target,$token,$parstack,$parser,$safeeval)=@_; - return "

$Apache::lonhomework::name

"; + my $result=''; + if ($target eq 'web') { + $result="

$Apache::lonhomework::name

"; + } + return $result; } sub end_displaytitle {