--- loncom/interface/slotrequest.pm 2005/09/13 07:56:03 1.17 +++ loncom/interface/slotrequest.pm 2005/10/17 19:26:50 1.24 @@ -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.17 2005/09/13 07:56:03 albertel Exp $ +# $Id: slotrequest.pm,v 1.24 2005/10/17 19:26:50 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -452,33 +452,63 @@ STUFF } sub show_table { - my ($r,$symb,$mgr)=@_; + my ($r,$mgr)=@_; my ($cnum,$cdom)=&get_course(); my %slots=&Apache::lonnet::dump('slots',$cdom,$cnum); + if ( (keys(%slots))[0] =~ /^error: 2 /) { + undef(%slots); + } my $available; if ($mgr eq 'F') { $r->print('
'); } + my $linkstart=''."\n";
$result.=' '.
@@ -528,7 +588,6 @@ sub upload_start {
my $ignore=&mt('Ignore First Line');
$result.=< @@ -541,7 +600,7 @@ ENDUPFORM } sub csvuploadmap_header { - my ($r,$symb,$datatoken,$distotal)= @_; + my ($r,$datatoken,$distotal)= @_; my $javascript; if ($env{'form.upfile_associate'} eq 'reverse') { $javascript=&csvupload_javascript_reverse_associate(); @@ -565,7 +624,6 @@ to this page if the data selected is ins - |