--- loncom/html/adm/helper/newslot.helper 2005/11/02 21:58:14 1.6
+++ loncom/html/adm/helper/newslot.helper 2005/11/18 16:51:13 1.10
@@ -7,6 +7,8 @@
if (exists($env{'form.name'}) ||
$env{'form.name'} =~ /\S/) {
$helper->{'VARS'}{'name'}=$env{'form.name'};
+ $helper->{VARS}{'origname'}=$env{'form.name'};
+ $helper->{DATA}{copy} = 1;
}
}
$helper->{DATA}{origslot} = sub {
@@ -17,7 +19,7 @@
}
my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
- my $name=$helper->{'VARS'}{'name'};
+ my $name=$helper->{VARS}{'origname'};
my %slot=&Apache::lonnet::get('slots', [$name], $cdom, $cnum);
if (!ref($slot{$name})) { return $default; }
if (!exists($slot{$name}{$which})) { return $default; }
@@ -27,18 +29,27 @@
Changing the Name will create a new slot with the new name, and not rename the existing slot.
-
Start time:
Time students can start reserving:
-
-
-
Maxium number of students allowed in this slot:
-
-
-
Time students can start reserving:
+
+
+
Maxium number of students allowed in this slot:
+
+
+
Period of time in which this slot is can only be uniquely chosen:
Start:
+
+
+
End:
Secret word proctors use to checkin users:
@@ -117,28 +162,6 @@
Period of time in which this slot is can only be uniquely chosen:
Start:
-
-
-
End:
Slot is: @@ -217,7 +240,9 @@ my ($uname,$udomain)=split(/:/,$user); push(@names,"$uname\@$udomain"); } - $slot{'proctor'}=join(',',@names); + # make sure the usenrmaes are unique + my %proctors = map { ($_,1) } @names; + $slot{'proctor'}=join(',',sort(keys(%proctors))); } my $cname = $env{'course.'.$env{'request.course.id'}.'.num'}; my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};