[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface loncommon.pm

raeburn raeburn@source.lon-capa.org
Thu, 11 Mar 2010 13:42:50 -0000


raeburn		Thu Mar 11 13:42:50 2010 EDT

  Modified files:              (Branch: version_2_9_X)
    /loncom/interface	loncommon.pm 
  Log:
  - Backport remaining part of 1.948.
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.692.4.31 loncom/interface/loncommon.pm:1.692.4.32
--- loncom/interface/loncommon.pm:1.692.4.31	Wed Mar 10 16:55:08 2010
+++ loncom/interface/loncommon.pm	Thu Mar 11 13:42:49 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.692.4.31 2010/03/10 16:55:08 raeburn Exp $
+# $Id: loncommon.pm,v 1.692.4.32 2010/03/11 13:42:49 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4253,6 +4253,11 @@
         } else {
             $legacy{'rolecolors'} = 1;
         }
+        if (ref($domconfig{'autoenroll'}) eq 'HASH') {
+            if ($domconfig{'autoenroll'}{'co-owners'}) {
+                $designhash{$udom.'.autoassign.co-owners'}=$domconfig{'autoenroll'}{'co-owners'};
+            }
+        }
         if (keys(%legacy) > 0) {
             my %legacyhash = &get_legacy_domconf($udom);
             foreach my $item (keys(%legacyhash)) {