[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);
         }
     }