--- loncom/interface/slotrequest.pm 2006/10/31 15:58:41 1.68.2.2 +++ loncom/interface/slotrequest.pm 2006/10/17 15:11:26 1.69 @@ -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.68.2.2 2006/10/31 15:58:41 albertel Exp $ +# $Id: slotrequest.pm,v 1.69 2006/10/17 15:11:26 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -77,7 +77,7 @@ sub end_page { =cut sub get_course { - (undef,my $courseid)=&Apache::lonxml::whichuser(); + (undef,my $courseid)=&Apache::lonnet::whichuser(); my $cdom=$env{'course.'.$courseid.'.domain'}; my $cnum=$env{'course.'.$courseid.'.num'}; return ($cnum,$cdom); @@ -433,7 +433,7 @@ sub release_slot { if ($mgr eq 'F' && defined($env{'form.symb'})) { - $symb = &unescape($env{'form.symb'}); + $symb = $env{'form.symb'}; } my ($result,$msg) = @@ -759,7 +759,7 @@ sub show_choices { my $text=&mt('Select'); my $command='get'; if (grep(/^\Q$slot\E$/,@got_slots)) { - $text=&mt('Drop Reservation'); + $text=&mt('Free Reservation'); $command='release'; } else { my $conflict = &check_for_conflict($symb,$slot,$slots{$slot},