--- loncom/interface/lonrequestcourse.pm	2010/11/19 00:09:15	1.54.2.6
+++ loncom/interface/lonrequestcourse.pm	2010/08/19 17:12:08	1.57
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Request a course
 #
-# $Id: lonrequestcourse.pm,v 1.54.2.6 2010/11/19 00:09:15 raeburn Exp $
+# $Id: lonrequestcourse.pm,v 1.57 2010/08/19 17:12:08 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'} = '';
-                    }
                 }
             }
         }
@@ -3599,19 +3591,16 @@ sub retrieve_settings {
             }
             $env{'form.datemode'} = $reqinfo{'datemode'};
             $env{'form.dateshift'} = $reqinfo{'dateshift'};
-
-            if ($reqinfo{'crstype'} eq 'official') {
-                $env{'form.autoadds'} = $reqinfo{'autoadds'};
-                $env{'form.autodrops'} = $reqinfo{'autodrops'};
-                if ($reqinfo{'instcode'} ne '') {
-                    $env{'form.sectotal'} = $reqinfo{'sectotal'};
-                    $env{'form.crosslisttotal'} = $reqinfo{'crosslisttotal'};
-                    $env{'form.instcode'} = $reqinfo{'instcode'};
-                    my $crscode = { 
-                                    $cnum => $reqinfo{'instcode'},
-                                  };
-                    &extract_instcode($dom,'instcode',$crscode,$cnum);
-                }
+            if (($reqinfo{'crstype'} eq 'official') && ($reqinfo{'instcode'} ne '')) { 
+                 $env{'form.sectotal'} = $reqinfo{'sectotal'};
+                 $env{'form.crosslisttotal'} = $reqinfo{'crosslisttotal'};
+                 $env{'form.autoadds'} = $reqinfo{'autoadds'};
+                 $env{'form.autdrops'} = $reqinfo{'autodrops'};
+                 $env{'form.instcode'} = $reqinfo{'instcode'};
+                 my $crscode = { 
+                                 $cnum => $reqinfo{'instcode'},
+                               };
+                 &extract_instcode($dom,'instcode',$crscode,$cnum);
             }
             my @currsec;
             if (ref($reqinfo{'sections'}) eq 'HASH') {