--- loncom/auth/lonroles.pm	2003/04/07 18:24:05	1.56
+++ loncom/auth/lonroles.pm	2003/05/21 20:10:53	1.57
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.56 2003/04/07 18:24:05 www Exp $
+# $Id: lonroles.pm,v 1.57 2003/05/21 20:10:53 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -50,6 +50,7 @@ use Apache::Constants qw(:common);
 use Apache::File();
 use Apache::lonmenu;
 use Apache::loncommon;
+use Apache::lonannounce;
 
 sub handler {
 
@@ -437,6 +438,9 @@ ENDHEADER
                         $r->print('<td>&nbsp;</td>');
                     }
                 }
+                $tremark.=&Apache::lonannounce::showday(time,1,
+                         &Apache::lonannounce::readcalendar($tdom.'_'.$trest));
+                
 		$r->print('<td><font color="'.$tfont.'">'.$trole.
                       '</font></td><td><font color="'.$tfont.'">'.$ttype.
                       '</font></td><td><font color="'.$tfont.'">'.$twhere.