loncom/interface/lonmsgdisplay.pm - diff

Return to lonmsgdisplay.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.26, 2006/05/17 09:51:26	version 1.27, 2006/05/17 14:58:28
Line 28	Line 28


package Apache::lonmsgdisplay;	package Apache::lonmsgdisplay;
use Apache::lonselstudent;

=pod	=pod

Line 126 use Apache::lonlocal;	Line 125 use Apache::lonlocal;
use Apache::loncommunicate;	use Apache::loncommunicate;
use Apache::lonfeedback;	use Apache::lonfeedback;
use Apache::lonrss();	use Apache::lonrss();
	use Apache::lonselstudent();

# Querystring component with sorting type	# Querystring component with sorting type
my $sqs;	my $sqs;
Line 1630 sub sendoffmail {	Line 1630 sub sendoffmail {
my %toaddr;	my %toaddr;
if ($to) {	if ($to) {
foreach my $dest (@$to) {	foreach my $dest (@$to) {
my ($user,$domain) = split /:/, $dest;	my ($user,$domain) = split(/:/, $dest);
if (($user ne '') && ($domain ne '')) {	if (($user ne '') && ($domain ne '')) {
my $address = $user.":".$domain; # How the code below expects it.	my $address = $user.":".$domain; # How the code below expects it.
$toaddr{$address} = '';	$toaddr{$address} = '';