--- loncom/interface/slotrequest.pm 2014/02/28 19:20:06 1.120 +++ loncom/interface/slotrequest.pm 2014/09/12 15:22:58 1.121 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler for requesting to have slots added to a students record # -# $Id: slotrequest.pm,v 1.120 2014/02/28 19:20:06 bisitz Exp $ +# $Id: slotrequest.pm,v 1.121 2014/09/12 15:22:58 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -847,13 +847,13 @@ sub show_choices { if (ref($consumed_uniqueperiods) eq 'HASH') { if (&Apache::lonnet::error(%$consumed_uniqueperiods)) { $r->print(''. - &mt('An error occurred determining slot availability'). + &mt('An error occurred determining slot availability.'). ''); return; } } elsif ($consumed_uniqueperiods =~ /^error: /) { $r->print(''. - &mt('An error occurred determining slot availability'). + &mt('An error occurred determining slot availability.'). ''); return; } @@ -862,7 +862,7 @@ sub show_choices { my @got_slots=&check_for_reservation($symb,'allslots'); if ($got_slots[0] =~ /^error: /) { $r->print(''. - &mt('An error occurred determining slot availability'). + &mt('An error occurred determining slot availability.'). ''); return; } @@ -877,12 +877,11 @@ sub show_choices { push(@available,$slot); } if (!@available) { - $output = '
'.&mt('No available times.'); + $output = ''.&mt('No available times.').''; if ($env{'form.command'} ne 'manageresv') { $output .= ' '. &mt('Return to last resource').''; } - $output .= '
'; $r->print($output); return; } @@ -958,6 +957,7 @@ STUFF $output .= &Apache::loncommon::end_data_table(); } $r->print($output); + return; } sub to_show { @@ -2683,7 +2683,9 @@ sub handler { return OK; } if ($env{'form.requestattempt'}) { + $r->print('
'); &show_choices($r,$symb); + $r->print('
'); } elsif ($env{'form.command'} eq 'release') { &release_slot($r,$symb); } elsif ($env{'form.command'} eq 'get') {