--- loncom/interface/lonwhatsnew.pm 2010/01/27 14:35:46 1.99.2.1 +++ loncom/interface/lonwhatsnew.pm 2010/02/28 22:38:11 1.101 @@ -1,5 +1,5 @@ # -# $Id: lonwhatsnew.pm,v 1.99.2.1 2010/01/27 14:35:46 raeburn Exp $ +# $Id: lonwhatsnew.pm,v 1.101 2010/02/28 22:38:11 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -348,11 +348,11 @@ sub display_actions_box { &GDBM_READER(),0640)) { my $furl=&HTML::Entities::encode($bighash{'first_url'},'"<>&'); untie(%bighash); - $r->print(''.$lt{'gtfr'}. - '
'); + $header .= ''.$lt{'gtfr'}. + '
'; } } - $r->print(&mt('Page set to be displayed after you have selected a role in this '.$lctype).'.' + $header .= &mt('Page set to be displayed after you have selected a role in this '.$lctype).'.' .' ' .&mt('Currently: [_1].',''.$currinit.'') .'  ' @@ -363,7 +363,7 @@ sub display_actions_box { ,'' ,'' ,'') - .'

'); + .' '; $r->print(&Apache::loncommon::head_subbox($header)); @@ -974,6 +974,9 @@ sub check_thresholds { if ($resource->handgrade($part) eq 'yes') { next; } + if ($resource->is_anonsurvey($part)) { + next; + } if ($resource->is_survey($part)) { next; } @@ -1166,7 +1169,6 @@ sub getnormalmail { &Apache::lonmsg::unpackmsgid($msgid); if (($fromcid) && ($fromcid eq $env{'request.course.id'})) { if (defined($sendtime) && $sendtime!~/error/) { - my $numsendtime = $sendtime; if ($status eq 'new') { $sendtime = &Apache::lonlocal::locallocaltime($sendtime); $msgcount ++; @@ -1198,7 +1200,6 @@ sub getcritmail { &Apache::lonmsg::unpackmsgid($msgid); if (($fromcid) && ($fromcid eq $env{'request.course.id'})) { if (defined($sendtime) && $sendtime!~/error/) { - my $numsendtime = $sendtime; $sendtime = &Apache::lonlocal::locallocaltime($sendtime); $critmsgcount ++; if ($shortsubj eq '') {