--- loncom/html/adm/helper/newslot.helper 2006/05/09 19:06:07 1.16
+++ loncom/html/adm/helper/newslot.helper 2006/05/16 21:03:42 1.19
@@ -218,13 +218,22 @@
RESTRICTUSER
+
+ No proctor checkin required for access.
+ Require proctored access.
+
+ my $default=&{$helper->{DATA}{origslot}}('proctor');
+ if ($default) { return 'yes'; }
+ return 'no';
+
+
+
my @defaults;
my $default=&{$helper->{DATA}{origslot}}('proctor');
if ($default) {
- $default=~ tr/@/:/;
@defaults=(split(',',$default));
}
return @defaults;
@@ -288,7 +297,8 @@
$helper->{'VARS'}{'endunique'}];
}
- if ( $helper->{'VARS'}{'proctor'} =~/\S/ ) {
+ if ( $helper->{'VARS'}{'useproctor'} eq 'yes'
+ && $helper->{'VARS'}{'proctor'} =~/\S/ ) {
my @names;
# just need the username/domain throw away the other data
# that returns