loncom/enrollment/Autoenroll.pl - diff

Return to Autoenroll.pl CVS log

Up to [LON-CAPA] / loncom / enrollment

-version 1.25, 2007/03/02 21:38:18
+version 1.26, 2007/05/14 17:35:01
  Line 49
  # For each domain ......
      foreach my $dom (@domains) {
-     #only run if configured to
+         #only run if configured to
-         if (! &localenroll::run($dom)) { next; }
+         my $run_enroll = 0;
+         my $settings;
+         my %domconfig =
+             &Apache::lonnet::get_dom('configuration',['autoenroll'],$dom);
+         if (ref($domconfig{'autoenroll'}) eq 'HASH') {
+             $settings = $domconfig{'autoenroll'};
+             if ($settings->{'run'} eq '1') {
+                 $run_enroll = 1;
+             }
+         } else {
+             $run_enroll = &localenroll::run($dom);
+         }
+         next if ($run_enroll != 1);
          $env{'user.domain'} = $dom;
          # Initialize language handler
          &Apache::lonlocal::get_language_handle();