version 1.137, 2018/01/31 15:28:47
|
version 1.138, 2018/06/24 04:11:08
|
Line 938 sub get_slot {
|
Line 938 sub get_slot {
|
if ($slot_name && $slot_name ne $conflictable_slot) { |
if ($slot_name && $slot_name ne $conflictable_slot) { |
my %slot=&Apache::lonnet::get_slot($slot_name); |
my %slot=&Apache::lonnet::get_slot($slot_name); |
my $description1=&get_description($slot_name,\%slot); |
my $description1=&get_description($slot_name,\%slot); |
|
my $slottype1=$slot{'type'}; |
%slot=&Apache::lonnet::get_slot($env{'form.slotname'}); |
%slot=&Apache::lonnet::get_slot($env{'form.slotname'}); |
my $description2=&get_description($env{'form.slotname'},\%slot); |
my $description2=&get_description($env{'form.slotname'},\%slot); |
if ($slot_name ne $env{'form.slotname'}) { |
if ($slottype1 eq 'preassigned') { |
|
$r->print('<p>'.&mt('You already have a reservation: "[_1]", assigned by your instructor.', |
|
$description1).'</p>'. |
|
'<p>'.&mt('Your instructor must unassign it before you can make a new reservation.'). |
|
'</p>'); |
|
} elsif ($slot_name ne $env{'form.slotname'}) { |
$r->print(<<STUFF); |
$r->print(<<STUFF); |
<form method="post" action="/adm/slotrequest"> |
<form method="post" action="/adm/slotrequest"> |
<input type="hidden" name="symb" value="$env{'form.symb'}" /> |
<input type="hidden" name="symb" value="$env{'form.symb'}" /> |