[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 = ' ';