[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm

www lon-capa-cvs@mail.lon-capa.org
Sat, 18 Oct 2003 16:06:47 -0000


www		Sat Oct 18 12:06:47 2003 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  Correct HTML error.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.69 loncom/interface/loncreateuser.pm:1.70
--- loncom/interface/loncreateuser.pm:1.69	Mon Oct 13 17:41:19 2003
+++ loncom/interface/loncreateuser.pm	Sat Oct 18 12:06:47 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.69 2003/10/13 21:41:19 albertel Exp $
+# $Id: loncreateuser.pm,v 1.70 2003/10/18 16:06:47 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -658,7 +658,7 @@
     if ($ENV{'form.makeuser'}) {
         # Create a new user
 	$r->print(<<ENDNEWUSERHEAD);
-<h3>Creating user "$ENV{'form.ccuname'}" in domain "$ENV{'form.ccdomain'}"</h2>
+<h3>Creating user "$ENV{'form.ccuname'}" in domain "$ENV{'form.ccdomain'}"</h3>
 ENDNEWUSERHEAD
         # Check for the authentication mode and password
         if (! $amode || ! $genpwd) {
@@ -687,7 +687,7 @@
 	$r->print('Generating user: '.$result);
         my $home = &Apache::lonnet::homeserver($ENV{'form.ccuname'},
                                                $ENV{'form.ccdomain'});
-        $r->print('<br>Home server: '.$home.' '.
+        $r->print('<br />Home server: '.$home.' '.
                   $Apache::lonnet::libserv{$home});
     } elsif (($ENV{'form.login'} ne 'nochange') &&
              ($ENV{'form.login'} ne ''        )) {