--- loncom/interface/lonmsgdisplay.pm 2006/06/27 21:32:24 1.34
+++ loncom/interface/lonmsgdisplay.pm 2006/06/29 17:50:01 1.35.2.1
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging display
#
-# $Id: lonmsgdisplay.pm,v 1.34 2006/06/27 21:32:24 albertel Exp $
+# $Id: lonmsgdisplay.pm,v 1.35.2.1 2006/06/29 17:50:01 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -453,7 +453,7 @@ sub disnew {
my %lt=&Apache::lonlocal::texthash(
'nm' => 'New Messages',
'su' => 'Subject',
- 'co' => 'Course/Group',
+ 'co' => 'Course',
'da' => 'Date',
'us' => 'Username',
'op' => 'Open',
@@ -622,9 +622,9 @@ ENDDISHEADER
}
$r->print('
');
if ($env{'form.sortedby'} eq "revcourse") {
- $r->print(''.&mt('Course/Group').'');
+ $r->print(''.&mt('Course').'');
} else {
- $r->print(''.&mt('Course/Group').'');
+ $r->print(''.&mt('Course').'');
}
$r->print(' | ');
if ($env{'form.sortedby'} eq "revstatus") {
@@ -1379,7 +1379,7 @@ sub build_block_table {
my ($r,$startblock,$endblock,$setters) = @_;
my %lt = &Apache::lonlocal::texthash(
'cacb' => 'Currently active communication blocks',
- 'cour' => 'Course/Group',
+ 'cour' => 'Course',
'dura' => 'Duration',
'blse' => 'Block set by'
);
@@ -1641,12 +1641,13 @@ sub sendoffmail {
&statuschange($msgid,'replied',$folder);
}
- my $to = $env{'form.selectedusers.forminput'};
+ my @to =
+ &Apache::loncommon::get_env_multiple('form.selectedusers.forminput');
my $mode = $env{'form.sendmode'};
my %toaddr;
- if ($to) {
- foreach my $dest (@$to) {
+ if (@to) {
+ foreach my $dest (@to) {
my ($user,$domain) = split(/:/, $dest);
if (($user ne '') && ($domain ne '')) {
my $address = $user.":".$domain; # How the code below expects it.
|