version 1.113, 2012/06/09 15:41:26
|
version 1.116, 2012/08/27 14:33:15
|
Line 339 sub store_slot_parm {
|
Line 339 sub store_slot_parm {
|
context => $env{'form.context'}, |
context => $env{'form.context'}, |
); |
); |
|
|
&Apache::lonnet::instructor_log('slotreservationslog',\%storehash, |
&Apache::lonnet::write_log('course','slotreservationslog',\%storehash, |
'',$env{'user.name'},$env{'user.domain'}, |
'',$env{'user.name'},$env{'user.domain'}, |
$cnum,$cdom); |
$cnum,$cdom); |
&Apache::lonnet::instructor_log($cdom.'_'.$cnum.'_slotlog',\%storehash, |
&Apache::lonnet::write_log('course',$cdom.'_'.$cnum.'_slotlog',\%storehash, |
1,$env{'user.name'},$env{'user.domain'}, |
1,$env{'user.name'},$env{'user.domain'}, |
$env{'user.name'},$env{'user.domain'}); |
$env{'user.name'},$env{'user.domain'}); |
|
|
return; |
return; |
} |
} |
Line 538 sub release_reservation {
|
Line 538 sub release_reservation {
|
action => 'release', |
action => 'release', |
context => $env{'form.context'}, |
context => $env{'form.context'}, |
); |
); |
&Apache::lonnet::instructor_log('slotreservationslog',\%storehash, |
&Apache::lonnet::write_log('slotreservationslog',\%storehash, |
1,$uname,$udom,$cnum,$cdom); |
1,$uname,$udom,$cnum,$cdom); |
&Apache::lonnet::instructor_log($cdom.'_'.$cnum.'_slotlog',\%storehash, |
&Apache::lonnet::write_log($cdom.'_'.$cnum.'_slotlog',\%storehash, |
1,$uname,$udom,$uname,$udom); |
1,$uname,$udom,$uname,$udom); |
} |
} |
} |
} |
|
|
Line 877 sub show_choices {
|
Line 877 sub show_choices {
|
push(@available,$slot); |
push(@available,$slot); |
} |
} |
if (!@available) { |
if (!@available) { |
$output = &mt('No available times.'); |
$output = '<div class="LC_info">'.&mt('No available times.'); |
if ($env{'form.command'} ne 'manageresv') { |
if ($env{'form.command'} ne 'manageresv') { |
$output .= ' <a href="/adm/flip?postdata=return:">'. |
$output .= ' <a href="/adm/flip?postdata=return:">'. |
&mt('Return to last resource').'</a>'; |
&mt('Return to last resource').'</a>'; |
} |
} |
$r->print('<p class="LC_info">'.$output.'</p>'); |
$output .= '</div>'; |
|
$r->print($output); |
return; |
return; |
} |
} |
if ($env{'form.command'} eq 'manageresv') { |
if ($env{'form.command'} eq 'manageresv') { |