version 1.18, 2006/05/16 21:55:56
|
version 1.20, 2006/05/18 01:09:14
|
Line 33
|
Line 33
|
use Apache::lonnet; |
use Apache::lonnet; |
use Apache::loncoursedata; |
use Apache::loncoursedata; |
use Apache::lonmsg; |
use Apache::lonmsg; |
|
use Apache::longroup; |
use HTML::Entities; |
use HTML::Entities; |
|
|
# Determine the library server's domain and hostID |
# Determine the library server's domain and hostID |
Line 155
|
Line 156
|
foreach my $cc (@to_notify) { |
foreach my $cc (@to_notify) { |
my ($ccname,$ccdom); |
my ($ccname,$ccdom); |
if ($cc =~ /:/) { |
if ($cc =~ /:/) { |
($ccname,$ccdom) = split/:/,$cc; |
($ccname,$ccdom) = split(/:/,$cc); |
} elsif ($cc =~ /\@/) { |
} elsif ($cc =~ /\@/) { |
($ccname,$ccdom) = split/\@/,$cc; |
($ccname,$ccdom) = split(/\@/,$cc); |
} |
} |
my $status = &Apache::lonmsg::user_normal_msg($ccname,$ccdom,$subject,$message); |
my $status = &Apache::lonmsg::user_normal_msg($ccname,$ccdom,$subject,$message); |
} |
} |