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

raeburn raeburn@source.lon-capa.org
Tue, 19 Jan 2010 20:31:37 -0000


raeburn		Tue Jan 19 20:31:37 2010 EDT

  Modified files:              (Branch: version_2_9_X)
    /loncom/interface	loncreateuser.pm 
  Log:
  - Backport 1.320.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.295.2.19 loncom/interface/loncreateuser.pm:1.295.2.20
--- loncom/interface/loncreateuser.pm:1.295.2.19	Tue Jan 19 17:16:59 2010
+++ loncom/interface/loncreateuser.pm	Tue Jan 19 20:31:37 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.295.2.19 2010/01/19 17:16:59 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.295.2.20 2010/01/19 20:31:37 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4184,18 +4184,21 @@
                 permission => $permission->{'cusr'},
               });
         if (!exists($permission->{'cusr_section'})) {
-            push(@courselinks,
-               { text => 'Automated Enrollment Manager',
-                 help => 'Course_Automated_Enrollment',
-                 permission => (&Apache::lonnet::auto_run($cnum,$cdom)
-                                && $permission->{'cusr'}),
-                 url  => '/adm/populate',
-                 },
-               { text => 'Configure User Self-enrollment',
-                 help => 'Course_Self_Enrollment',
-                 action => 'selfenroll',
-                 permission => $permission->{'cusr'},
-               });
+            if ($crstype ne 'Community') {
+                push(@courselinks,
+                   { text => 'Automated Enrollment Manager',
+                     help => 'Course_Automated_Enrollment',
+                     permission => (&Apache::lonnet::auto_run($cnum,$cdom)
+                                   && $permission->{'cusr'}),
+                     url  => '/adm/populate',
+                   });
+             }
+             push(@courselinks,
+                 { text  => 'Configure User Self-enrollment',
+                   help  => 'Course_Self_Enrollment',
+                   action => 'selfenroll',
+                   permission => $permission->{'cusr'},
+                 });
         }
         if ($env{'course.'.$env{'request.course.id'}.'.internal.selfenroll_approval'}) {
             push(@courselinks,