[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm
raeburn
raeburn@source.lon-capa.org
Fri, 30 Oct 2009 18:32:25 -0000
raeburn Fri Oct 30 18:32:25 2009 EDT
Modified files:
/loncom/interface loncreateuser.pm
Log:
Communities do not need an Automated Enrollment link.
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.319 loncom/interface/loncreateuser.pm:1.320
--- loncom/interface/loncreateuser.pm:1.319 Fri Oct 30 04:44:56 2009
+++ loncom/interface/loncreateuser.pm Fri Oct 30 18:32:25 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.319 2009/10/30 04:44:56 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.320 2009/10/30 18:32:25 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4307,17 +4307,20 @@
}
if (!exists($permission->{'cusr_section'})){
-
- push(@{ $menu[2]->{items} },
- {
- linktext => 'Automated Enrollment',
- icon => 'roles.png',
- #help => 'Course_Automated_Enrollment',
- permission => (&Apache::lonnet::auto_run($cnum,$cdom)
- && $permission->{'cusr'}),
- url => '/adm/populate',
- linktitle => 'Automated enrollment manager.',
- },
+ if ($crstype ne 'Community') {
+ push(@{ $menu[2]->{items} },
+ {
+ linktext => 'Automated Enrollment',
+ icon => 'roles.png',
+ #help => 'Course_Automated_Enrollment',
+ permission => (&Apache::lonnet::auto_run($cnum,$cdom)
+ && $permission->{'cusr'}),
+ url => '/adm/populate',
+ linktitle => 'Automated enrollment manager.',
+ }
+ );
+ }
+ push(@{ $menu[2]->{items} },
{
linktext => 'User Self-Enrollment',
icon => 'cstr.png',
@@ -4327,7 +4330,6 @@
linktitle => 'Configure user self-enrollment.',
},
);
-
}
};
return Apache::lonhtmlcommon::generate_menu(@menu);