[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;