--- loncom/interface/lonrequestcourse.pm 2010/11/13 14:10:40 1.54.2.5 +++ loncom/interface/lonrequestcourse.pm 2010/08/11 13:00:45 1.56 @@ -1,7 +1,7 @@ # The LearningOnline Network # Request a course # -# $Id: lonrequestcourse.pm,v 1.54.2.5 2010/11/13 14:10:40 raeburn Exp $ +# $Id: lonrequestcourse.pm,v 1.56 2010/08/11 13:00:45 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -647,11 +647,7 @@ sub onload_action { sub print_main_menu { my ($r,$can_request,$states,$dom,$jscript,$loaditems,$crumb,$request_domains) = @_; my ($types,$typename) = &Apache::loncommon::course_types(); - my $onchange; - unless ($env{'form.interface'} eq 'textual') { - $onchange = 'this.form.submit()'; - } - + my $onchange = 'this.form.submit()'; my $nextstate_setter = "\n"; if (ref($states) eq 'HASH') { foreach my $key (keys(%{$states})) { @@ -3040,10 +3036,6 @@ 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'} = ''; - } } } } @@ -3132,7 +3124,10 @@ sub print_request_outcome { } my $autoadds = 0; if ($env{'form.autoadds'}) { - $autoadds = $env{'form.autoadds'}; + $autodrops = $env{'form.autoadds'}; + } + if ($env{'form.autoadds'}) { + $autodrops = $env{'form.autoadds'}; } my $instcode = ''; if (exists($env{'form.instcode'})) {