[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm
raeburn
raeburn@source.lon-capa.org
Sat, 22 May 2010 01:27:49 -0000
raeburn Sat May 22 01:27:49 2010 EDT
Modified files:
/loncom/interface loncreateuser.pm
Log:
- Eliminate duplicate declarations.
- Counter needs to increment when building tabular display of course personnel to be notified when an enrollment request needs approval.
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.342 loncom/interface/loncreateuser.pm:1.343
--- loncom/interface/loncreateuser.pm:1.342 Wed Apr 28 14:55:58 2010
+++ loncom/interface/loncreateuser.pm Sat May 22 01:27:48 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.342 2010/04/28 14:55:58 wenzelju Exp $
+# $Id: loncreateuser.pm,v 1.343 2010/05/22 01:27:48 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2439,7 +2439,7 @@
}
}
##
- my (@userroles,%userupdate,$cnum,$cdom,$crstype,%namechanged);
+ my (@userroles,%userupdate,$cnum,$cdom,%namechanged);
if ($context eq 'course') {
($cnum,$cdom) = &Apache::lonuserutils::get_course_identity();
$crstype = &Apache::loncommon::course_type($cdom.'_'.$cnum);
@@ -4954,7 +4954,7 @@
'<input type="checkbox" name="selfenroll_notify"'.$notifyon.' value="'.$cc.'" />'.
&Apache::loncommon::plainname($ccuname,$ccudom).
'</label></span></td>';
- $count;
+ $count ++;
}
my $rem = $count%$numcols;
if ($rem) {
@@ -4971,7 +4971,7 @@
my $cid = $env{'request.course.id'};
my $currlim = $env{'course.'.$cid.'.internal.selfenroll_limit'};
my $currcap = $env{'course.'.$cid.'.internal.selfenroll_cap'};
- my $nolimit = ' checked="checked" ';
+ $nolimit = ' checked="checked" ';
if ($currlim eq 'allstudents') {
$crslimit = ' checked="checked" ';
$selflimit = ' ';