--- loncom/interface/loncreateuser.pm	2002/11/18 20:06:53	1.44
+++ loncom/interface/loncreateuser.pm	2002/11/25 18:44:33	1.45
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.44 2002/11/18 20:06:53 matthew Exp $
+# $Id: loncreateuser.pm,v 1.45 2002/11/25 18:44:33 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -47,7 +47,7 @@
 # 11/12,11/13,11/15 Scott Harrison
 # 02/11/02 Matthew Hall
 #
-# $Id: loncreateuser.pm,v 1.44 2002/11/18 20:06:53 matthew Exp $
+# $Id: loncreateuser.pm,v 1.45 2002/11/25 18:44:33 matthew Exp $
 ###
 
 package Apache::loncreateuser;
@@ -341,7 +341,7 @@ END
 	my $currentauth=&Apache::lonnet::queryauthenticate($ccuname,$ccdomain);
 	if ($currentauth=~/^krb(4|5):/) {
 	    $currentauth=~/^krb(4|5):(.*)/;
-	    my $krbdefdom2=$1;
+	    my $krbdefdom=$1;
             my %param = ( formname => 'document.cu',
                           kerb_def_dom => $krbdefdom 
                           );