Diff for /loncom/interface/loncommunicate.pm between versions 1.45 and 1.47

version 1.45, 2009/05/07 11:12:47 version 1.47, 2012/04/18 19:56:59
Line 42  sub menu { Line 42  sub menu {
     my $usertype = 'student';      my $usertype = 'student';
     if (defined($env{'course.'.$env{'request.course.id'}.'.type'})) {      if (defined($env{'course.'.$env{'request.course.id'}.'.type'})) {
         $crstype = $env{'course.'.$env{'request.course.id'}.'.type'};          $crstype = $env{'course.'.$env{'request.course.id'}.'.type'};
         if ($crstype eq 'Group') {          if ($crstype eq 'Community') {
             $usertype = 'member';              $usertype = 'member';
         }             }   
     }      }
Line 102  sub menu { Line 102  sub menu {
  help => 'Course_Face_To_Face_Records,Course_Critical_Message',   help => 'Course_Face_To_Face_Records,Course_Critical_Message',
              linktitle => "User notes, records of face-to-face discussions, critical messages, broadcast messages and archived messages in $crstype."},               linktitle => "User notes, records of face-to-face discussions, critical messages, broadcast messages and archived messages in $crstype."},
                                           
             {url => '/adm/email?block=display',              {url => '/adm/setblock?caller=email',
  permission => "$can_dcm",   permission => "$can_dcm",
              icon => 'comblock.png',               icon => 'comblock.png',
  linktext => 'Communication Blocking',   linktext => 'Communication Blocking',

Removed from v.1.45  
changed lines
  Added in v.1.47


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>