loncom/interface/loncommunicate.pm - diff

Return to loncommunicate.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.43, 2008/12/09 18:04:22	version 1.46, 2009/07/25 23:16:04
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 73 sub menu {	Line 73 sub menu {
items => [	items => [
{url => '/adm/email?compose=individual',	{url => '/adm/email?compose=individual',
permission => 'F',	permission => 'F',
icon => 'mail-reply-sender.png',	icon => 'mail-message-new.png',
linktext => 'New Message',	linktext => 'New Message',
linktitle => 'Send a message to users.'},	linktitle => 'Send a message to users.'},

Line 87 sub menu {	Line 87 sub menu {
{url => '/adm/email?compose=upload',	{url => '/adm/email?compose=upload',
permission => "$can_srm",	permission => "$can_srm",
icon => 'fromfile.png',	icon => 'fromfile.png',
linktext => 'New Messages from Template',	linktext => 'New Messages from File',
linktitle => 'Create a message from template and send to users.'},	linktitle => 'Create a message from file and send to users.'},
]},	]},
);	);