--- loncom/interface/lonrequestcourse.pm 2010/08/11 13:00:45 1.56 +++ loncom/interface/lonrequestcourse.pm 2010/09/10 20:25:51 1.58 @@ -1,7 +1,7 @@ # The LearningOnline Network # Request a course # -# $Id: lonrequestcourse.pm,v 1.56 2010/08/11 13:00:45 raeburn Exp $ +# $Id: lonrequestcourse.pm,v 1.58 2010/09/10 20:25:51 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3036,6 +3036,10 @@ sub print_request_outcome { push(@instsections,$sec); } $sections{$i}{'loncapa'} = $env{'form.loncapasec_'.$i}; + $sections{$i}{'loncapa'} =~ s/\W//g; + if ($sections{$i}{'loncapa'} eq 'none') { + $sections{$i}{'loncapa'} = ''; + } } } } @@ -3124,10 +3128,7 @@ sub print_request_outcome { } my $autoadds = 0; if ($env{'form.autoadds'}) { - $autodrops = $env{'form.autoadds'}; - } - if ($env{'form.autoadds'}) { - $autodrops = $env{'form.autoadds'}; + $autoadds = $env{'form.autoadds'}; } my $instcode = ''; if (exists($env{'form.instcode'})) {