version 1.19, 2005/10/07 19:44:06
|
version 1.20, 2005/10/07 20:00:20
|
Line 501 sub show_table {
|
Line 501 sub show_table {
|
$unique=localtime($slots{$slot}{'uniqueperiod'}[0]).','. |
$unique=localtime($slots{$slot}{'uniqueperiod'}[0]).','. |
localtime($slots{$slot}{'uniqueperiod'}[1]); |
localtime($slots{$slot}{'uniqueperiod'}[1]); |
} |
} |
|
|
|
my @proctors = map { |
|
my ($uname,$udom)=split(/@/,$_); |
|
my $fullname=&Apache::loncommon::plainname($uname,$udom); |
|
$fullname=~s/\s/ /g; |
|
&Apache::loncommon::aboutmewrapper($fullname,$uname,$udom); |
|
} (split(/\s*,\s*/,$slots{$slot}->{'proctor'})); |
|
|
|
my $proctors=join(', ',@proctors); |
|
|
|
|
my $edit=(<<EDITFORM); |
my $edit=(<<EDITFORM); |
<form method="POST"> |
<form method="POST"> |
Line 519 EDITFORM
|
Line 529 EDITFORM
|
<td>$end</td> |
<td>$end</td> |
<td>$slots{$slot}->{'maxspace'}</td> |
<td>$slots{$slot}->{'maxspace'}</td> |
<td>$ids</td> |
<td>$ids</td> |
<td>$slots{$slot}->{'proctor'}</td> |
<td>$proctors</td> |
<td>$unique</td> |
<td>$unique</td> |
</tr> |
</tr> |
STUFF |
STUFF |