--- loncom/interface/Attic/londropadd.pm 2001/02/22 16:47:54 1.13
+++ loncom/interface/Attic/londropadd.pm 2002/01/04 15:56:07 1.18
@@ -1,12 +1,37 @@
# The LearningOnline Network with CAPA
# Handler to drop and add students in courses
#
+# $Id: londropadd.pm,v 1.18 2002/01/04 15:56:07 www Exp $
+#
+# Copyright Michigan State University Board of Trustees
+#
+# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
+#
+# LON-CAPA is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# LON-CAPA is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with LON-CAPA; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+#
+# /home/httpd/html/adm/gpl.txt
+#
+# http://www.lon-capa.org/
+#
# (Handler to set parameters for assessments
#
# (Handler to resolve ambiguous file locations
#
# (TeX Content Handler
#
+# YEAR=2000
# 05/29/00,05/30,10/11 Gerd Kortemeyer)
#
# 10/11,10/12,10/16 Gerd Kortemeyer)
@@ -15,7 +40,14 @@
# 12/08,12/12 Gerd Kortemeyer)
#
# 12/26,12/27,12/28,
+# YEAR=2001
# 01/01/01,01/15,02/10,02/13,02/14,02/22 Gerd Kortemeyer
+# 8/6 Scott Harrison
+# Guy Albertelli
+# 9/25 Gerd Kortemeyer
+# 12/19 Guy Albertelli
+# YEAR=2002
+# 1/4 Gerd Kortemeyer
package Apache::londropadd;
@@ -147,7 +179,7 @@ sub dropstudent {
if ($key=~/^$courseid(?:\/)*(\w+)*\_st$/) {
my $section=$1;
if ($key eq $courseid.'_st') { $section=''; }
- if ($section ne $csec) {
+ if (((!$section) && (!$csec)) || ($section ne $csec)) {
my ($dummy,$end,$start)=split(/\_/,
&Apache::lonnet::unescape($value));
my $now=time;
@@ -257,6 +289,10 @@ function verify(vf) {
return;
}
}
+ if (vf.login[2].checked) {
+ foundatype=1;
+ //An argument is not required
+ }
if (foundatype==0) {
alert('You need to set the login type');
return;
@@ -315,6 +351,7 @@ function flip(vf,tf) {
vf.login[1].checked=true;
vf.intpwd.value='';
vf.krbdom.value='';
+ vf.locarg.value='';
}
}
@@ -431,13 +468,22 @@ ENDPICK
Login Type
-Note: this will not take effect if the user already exists
-
+
Note: this will not take effect if the user already exists