[LON-CAPA-cvs] cvs: loncom /interface lonwhatsnew.pm

[raeburn]

raeburn		Thu Jan 12 20:18:44 2006 EDT

  Modified files:              
    /loncom/interface	lonwhatsnew.pm 
  Log:
  bug 4561. Actually save the values returned by &getnormalmail() and &getcritmail(). 
  
  
Index: loncom/interface/lonwhatsnew.pm
diff -u loncom/interface/lonwhatsnew.pm:1.49 loncom/interface/lonwhatsnew.pm:1.50
--- loncom/interface/lonwhatsnew.pm:1.49	Thu Jan 12 04:32:26 2006
+++ loncom/interface/lonwhatsnew.pm	Thu Jan 12 20:18:44 2006
@@ -1,5 +1,5 @@
 #
-# $Id: lonwhatsnew.pm,v 1.49 2006/01/12 09:32:26 albertel Exp $
+# $Id: lonwhatsnew.pm,v 1.50 2006/01/13 01:18:44 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -401,10 +401,10 @@
         &getitems(\%unread,\%ungraded,\%bombed,\%triggered,\%changed,\@newdiscussions,\@tograde,\@bombs,\@warnings,$rowColor1,$rowColor2,\%threshold,$cdom,$crs,\%res_title,\%show,$starttime,$countunread);
     }
     if ($show{'coursenormalmail'}) {
-        &getnormalmail(\@newmsgs);
+        $msgcount = &getnormalmail(\@newmsgs);
     }
     if ($show{'coursecritmail'}) {
-        &getcritmail(\@critmsgs);
+        $critmsgcount = &getcritmail(\@critmsgs);
     }
 
     $r->print(qq|<a href="javascript:changeAll('hide');">$lt{'hial'}</a>