--- loncom/interface/loncommon.pm	2007/09/19 06:24:26	1.586
+++ loncom/interface/loncommon.pm	2007/09/24 23:29:53	1.587
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.586 2007/09/19 06:24:26 raeburn Exp $
+# $Id: loncommon.pm,v 1.587 2007/09/24 23:29:53 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1883,6 +1883,14 @@ sub authform_kerberos{
     }
     if (!$can_assign{'krb4'} && !$can_assign{'krb5'}) {
         return;
+    } elsif ($authtype eq '') {
+        if (grep(/^mode$/,(keys(%in)))) {
+            if ($in{'mode'} eq 'modifycourse') {
+                if ($authnum == 1) {
+                    $authtype = '<input type="hidden" name="login" value="krb">';
+                }
+            }
+        }
     }
     $jscall = "javascript:changed_radio('krb',$in{'formname'});";
     if ($authtype eq '') {
@@ -1956,6 +1964,14 @@ sub authform_internal{
     }
     if (!$can_assign{'int'}) {
         return;
+    } elsif ($authtype eq '') {
+        if (grep(/^mode$/,(keys(%in)))) {
+            if ($in{'mode'} eq 'modifycourse') {
+                if ($authnum == 1) {
+                    $authtype = '<input type="hidden" name="login" value="int">';
+                }
+            }
+        }
     }
     $jscall = "javascript:changed_radio('int',$in{'formname'});";
     if ($authtype eq '') {
@@ -1997,6 +2013,14 @@ sub authform_local{
     }
     if (!$can_assign{'loc'}) {
         return;
+    } elsif ($authtype eq '') {
+        if (grep(/^mode$/,(keys(%in)))) {
+            if ($in{'mode'} eq 'modifycourse') {
+                if ($authnum == 1) {
+                    $authtype = '<input type="hidden" name="login" value="loc">';
+                }
+            }
+        }
     }
     $jscall = "javascript:changed_radio('loc',$in{'formname'});";
     if ($authtype eq '') {
@@ -2035,6 +2059,14 @@ sub authform_filesystem{
     }
     if (!$can_assign{'fsys'}) {
         return;
+    } elsif ($authtype eq '') {
+        if (grep(/^mode$/,(keys(%in)))) {
+            if ($in{'mode'} eq 'modifycourse') {
+                if ($authnum == 1) {
+                    $authtype = '<input type="hidden" name="login" value="fsys">';
+                }
+            }
+        }
     }
     $jscall = "javascript:changed_radio('fsys',$in{'formname'});";
     if ($authtype eq '') {
@@ -2095,7 +2127,6 @@ sub get_assignable_auth {
     return ($authnum,%can_assign);
 }
 
-
 ###############################################################
 ##    Get Authentication Defaults for Domain                 ##
 ###############################################################