--- loncom/interface/lonmodifycourse.pm	2004/06/29 14:56:32	1.10
+++ loncom/interface/lonmodifycourse.pm	2004/07/15 18:58:20	1.11
@@ -488,7 +488,6 @@ sub modify_course {
         $newattr{'authtype'} = $ENV{'form.login'};
         $newattr{'authtype'} .= $ENV{'form.krbver'};
         $newattr{'autharg'} = $ENV{'form.krbarg'};
-        $newattr{'autharg'} =~ tr/a-z/A-Z/; 
     } elsif ($ENV{'form.login'} eq 'int') {
         $newattr{'authtype'} ='internal';
         if ((defined($ENV{'form.intarg'})) && ($ENV{'form.intarg'})) {