[LON-CAPA-cvs] cvs: loncom /interface lonnotify.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 14 Oct 2005 19:10:21 -0000
albertel Fri Oct 14 15:10:21 2005 EDT
Modified files:
/loncom/interface lonnotify.pm
Log:
- use changed dcmaildump calling
- change to use real logthis funtion
Index: loncom/interface/lonnotify.pm
diff -u loncom/interface/lonnotify.pm:1.5 loncom/interface/lonnotify.pm:1.6
--- loncom/interface/lonnotify.pm:1.5 Thu Oct 13 18:37:40 2005
+++ loncom/interface/lonnotify.pm Fri Oct 14 15:10:20 2005
@@ -216,8 +216,7 @@
my $start = &Apache::lonhtmlcommon::get_date_from_form('startdate');
my $end = &Apache::lonhtmlcommon::get_date_from_form('enddate');
my @senders = &Apache::loncommon::get_env_multiple('form.sender');
- my $senderlist = join('&',@senders);
- my %sentmail = &Apache::lonnet::dcmaildump($cdom,$start,$end,$senderlist);
+ my %sentmail = &Apache::lonnet::dcmaildump($cdom,$start,$end,\@senders);
my %dcmail = ();
my %Sortby = ();
my $jscript = <<"ENDSCRIPT";
@@ -756,7 +755,7 @@
# Store in dc email db files on appropriate servers.
foreach my $server (keys(%servers)) {
unless (&Apache::lonnet::dcmailput($domain,$msgid,\%servers,$server) eq 'ok') {
- &logthis('Storage of dc mail failed for domain'.$domain.' for server: '.
+ &Apache::lonnet::logthis('Storage of dc mail failed for domain'.$domain.' for server: '.
$server.'. Message ID was '.$msgid);
}
}