--- loncom/interface/Attic/londropadd.pm 2001/02/14 22:51:48 1.12 +++ loncom/interface/Attic/londropadd.pm 2001/08/07 14:07:36 1.14 @@ -7,6 +7,7 @@ # # (TeX Content Handler # +# YEAR=2000 # 05/29/00,05/30,10/11 Gerd Kortemeyer) # # 10/11,10/12,10/16 Gerd Kortemeyer) @@ -15,7 +16,9 @@ # 12/08,12/12 Gerd Kortemeyer) # # 12/26,12/27,12/28, -# 01/01/01,01/15,02/10,02/13,02/14 Gerd Kortemeyer +# YEAR=2001 +# 01/01/01,01/15,02/10,02/13,02/14,02/22 Gerd Kortemeyer +# 8/6 Scott Harrison package Apache::londropadd; @@ -411,14 +414,14 @@ ENDPICK 'id:ID/Student Number','sec:Group/Section', 'ipwd:Initial Password'); $r->print(''); - if (defined($sone{$i})) { - $r->print($sone{$i}."
\n"); + if (defined($sone{$_})) { + $r->print($sone{$_}."
\n"); } - if (defined($stwo{$i})) { - $r->print($stwo{$i}."
\n"); + if (defined($stwo{$_})) { + $r->print($stwo{$_}."
\n"); } - if (defined($sthree{$i})) { - $r->print($sthree{$i}."
\n"); + if (defined($sthree{$_})) { + $r->print($sthree{$_}."
\n"); } $r->print(''); $i++; @@ -520,18 +523,18 @@ function verify(vf) { var foundatype=0; var tw; var message=''; - if ((vf.cuname.value!=undefined) && (vf.cuname.value!='') && - (vf.cdomain.value!=undefined) && (vf.cdomain.value!='')) { + if ((typeof(vf.cuname.value)!="undefined") && (vf.cuname.value!='') && + (typeof(vf.cdomain.value)!="undefined") && (vf.cdomain.value!='')) { founduname=1; } - if ((vf.cfirst.value!=undefined) && (vf.cfirst.value!='') && - (vf.clast.value!=undefined) && (vf.clast.value!='')) { + if ((typeof(vf.cfirst.value)!="undefined") && (vf.cfirst.value!='') && + (typeof(vf.clast.value)!="undefined") && (vf.clast.value!='')) { foundname=1; } - if ((vf.csec.value!=undefined) && (vf.csec.value!='')) { + if ((typeof(vf.csec.value)!="undefined") && (vf.csec.value!='')) { foundsec=1; } - if ((vf.cstid.value!=undefined) && (vf.cstid.value!='')) { + if ((typeof(vf.cstid.value)!="undefined") && (vf.cstid.value!='')) { foundid=1; } if (founduname==0) {