[LON-CAPA-cvs] cvs: loncom /auth lonroles.pm

[albertel]

albertel		Mon Oct  9 21:54:34 2006 EDT

  Modified files:              
    /loncom/auth	lonroles.pm 
  Log:
  - no calendar for author or dc roles
  
  
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.164 loncom/auth/lonroles.pm:1.165
--- loncom/auth/lonroles.pm:1.164	Thu Aug 31 09:25:18 2006
+++ loncom/auth/lonroles.pm	Mon Oct  9 21:54:33 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.164 2006/08/31 13:25:18 albertel Exp $
+# $Id: lonroles.pm,v 1.165 2006/10/10 01:54:33 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -854,9 +854,10 @@
             $roletext.='<td'.$rowspan.'>&nbsp;</td>';
         }
     }
-    $tremark.=&Apache::lonannounce::showday(time,1,
-                 &Apache::lonannounce::readcalendar($tdom.'_'.$trest));
-
+    if ($trolecode !~ m/^(dc|ca|au|aa)\./) {
+	$tremark.=&Apache::lonannounce::showday(time,1,
+			 &Apache::lonannounce::readcalendar($tdom.'_'.$trest));
+    }
     $roletext.='<td><font color="'.$tfont.'">'.$trole.
 	       '</font></td><td><font color="'.$tfont.'">'.$twhere.
                '</font></td><td><font color="'.$tfont.'">'.$tpstart.