version 1.98, 2008/11/25 21:59:24
|
version 1.99, 2008/12/03 21:09:44
|
Line 718 sub groupmail_header {
|
Line 718 sub groupmail_header {
|
{href=>"/adm/email?compose=group&group=". |
{href=>"/adm/email?compose=group&group=". |
"$env{'form.group'}&$refarg", |
"$env{'form.group'}&$refarg", |
text=>"Send a Message in a Group", |
text=>"Send a Message in a Group", |
title=>"Compose Group E-mail"},); |
title=>"Compose Group Message"},); |
if ($action eq 'sending') { |
if ($action eq 'sending') { |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({text=>"E-mails being sent.", |
({text=>"Messages being sent.", |
title=>"E-mails sent"},); |
title=>"E-mails sent"},); |
} |
} |
my $groupheader = &Apache::loncommon::start_page('Group Email'); |
my $groupheader = &Apache::loncommon::start_page('Group Message'); |
$groupheader .= &Apache::lonhtmlcommon::breadcrumbs |
$groupheader .= &Apache::lonhtmlcommon::breadcrumbs |
('Group - '.$env{'form.group'}.' Email'); |
('Group - '.$env{'form.group'}.' Email'); |
return $groupheader; |
return $groupheader; |
Line 738 sub groupmail_sent {
|
Line 738 sub groupmail_sent {
|
} |
} |
my $output .= '<br /><br /><a href="/adm/email?compose=group&group='. |
my $output .= '<br /><br /><a href="/adm/email?compose=group&group='. |
$group.'&'.$refarg.'">'. |
$group.'&'.$refarg.'">'. |
&mt('Send another group email').'</a>'.' '. |
&mt('Send another group message').'</a>'.' '. |
'<a href="/adm/'.$cdom.'/'.$cnum.'/'.$group.'/smppg?'. |
'<a href="/adm/'.$cdom.'/'.$cnum.'/'.$group.'/smppg?'. |
$refarg.'">'. &mt('Return to group page').'</a>'; |
$refarg.'">'. &mt('Return to group page').'</a>'; |
return $output; |
return $output; |