loncom/interface/lonerrorhandler.pm - diff

Return to lonerrorhandler.pm CVS log

Up to [LON-CAPA] / loncom / interface

-version 1.23, 2009/02/12 21:15:47
+version 1.24, 2013/08/12 16:51:58
  Line 83  $env{'form.guesses'}
  $lt{'env'}:
  $env{'form.environment'}
  ENDMESSAGE
-         my $sysmail = $r->dir_config('lonSysEMail');
          my $defdom = $r->dir_config('lonDefDomain');
+         my $sysmail;
+         my $notify = 1;
+         my %domconfig = &Apache::lonnet::get_dom('configuration',['contacts']);
+         if (ref($domconfig{'contacts'}) eq 'HASH') {
+             if ($domconfig{'contacts'}{'reporterrors'} == 0) {
+                 $notify = 0;
+             }
+         }
+         if ($notify) {
+             $sysmail = 'errorrecord@loncapa.org';
+         }
          my $origmail = $r->dir_config('lonAdmEMail');
          my $recipients = &Apache::loncommon::build_recipient_list($sysmail,
                                               'errormail',$defdom,$origmail);