[LON-CAPA-cvs] cvs: loncom /interface lonwhatsnew.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Thu, 09 Jun 2005 18:41:10 -0000
albertel Thu Jun 9 14:41:10 2005 EDT
Modified files:
/loncom/interface lonwhatsnew.pm
Log:
- only look at resources that have discussion that I care about
Index: loncom/interface/lonwhatsnew.pm
diff -u loncom/interface/lonwhatsnew.pm:1.20 loncom/interface/lonwhatsnew.pm:1.21
--- loncom/interface/lonwhatsnew.pm:1.20 Thu Jun 9 13:40:05 2005
+++ loncom/interface/lonwhatsnew.pm Thu Jun 9 14:41:08 2005
@@ -1,5 +1,5 @@
#
-# $Id: lonwhatsnew.pm,v 1.20 2005/06/09 17:40:05 www Exp $
+# $Id: lonwhatsnew.pm,v 1.21 2005/06/09 18:41:08 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -532,7 +532,7 @@
$$res_title{$symb} = $title;
my $ressymb = $resource->wrap_symb();
# Check for unread discussion postings
- if (defined($discussiontime{$ressymb})) {
+ if ($resource->hasDiscussion()) {
push(@discussions,$ressymb);
my $prevread = 0;
my $unreadcount = 0;