[LON-CAPA-cvs] cvs: loncom /interface lonmsgdisplay.pm

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 29 Jun 2006 13:52:20 -0000


albertel		Thu Jun 29 09:52:20 2006 EDT

  Modified files:              
    /loncom/interface	lonmsgdisplay.pm 
  Log:
  - BUG#4856
  
  
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.34 loncom/interface/lonmsgdisplay.pm:1.35
--- loncom/interface/lonmsgdisplay.pm:1.34	Tue Jun 27 17:32:24 2006
+++ loncom/interface/lonmsgdisplay.pm	Thu Jun 29 09:52:19 2006
@@ -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 2006/06/29 13:52:19 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1641,12 +1641,13 @@
 	    &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.