--- loncom/interface/loncommunicate.pm 2008/12/10 14:36:36 1.44 +++ loncom/interface/loncommunicate.pm 2012/04/18 19:56:59 1.47 @@ -1,7 +1,7 @@ # The LearningOnline Network # Communicate # -# $Id: loncommunicate.pm,v 1.44 2008/12/10 14:36:36 diwert Exp $ +# $Id: loncommunicate.pm,v 1.47 2012/04/18 19:56:59 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -42,7 +42,7 @@ sub menu { my $usertype = 'student'; if (defined($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'; } } @@ -73,7 +73,7 @@ sub menu { items => [ {url => '/adm/email?compose=individual', permission => 'F', - icon => 'mail-reply-sender.png', + icon => 'mail-message-new.png', linktext => 'New Message', linktitle => 'Send a message to users.'}, @@ -102,7 +102,7 @@ sub menu { 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."}, - {url => '/adm/email?block=display', + {url => '/adm/setblock?caller=email', permission => "$can_dcm", icon => 'comblock.png', linktext => 'Communication Blocking',