--- loncom/interface/loncreateuser.pm 2003/12/10 20:38:09 1.72
+++ loncom/interface/loncreateuser.pm 2003/12/11 14:58:00 1.73
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.72 2003/12/10 20:38:09 sakharuk Exp $
+# $Id: loncreateuser.pm,v 1.73 2003/12/11 14:58:00 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -483,15 +483,20 @@ END
$currentauth=~/^localauth:/
) { # bad authentication scheme
if (&Apache::lonnet::allowed('mau',$ENV{'request.role.domain'})) {
+ my %lt=&Apache::lonlocal::texthash(
+ 'err' => "ERROR",
+ 'uuas' => "This user has an unrecognized authentication scheme",
+ 'sldb' => "Please specify login data below",
+ 'ld' => "Login Data"
+ );
$r->print(<
$generalrule
$authformkrb
$authformint
@@ -501,14 +506,18 @@ ENDBADAUTH } else { # This user is not allowed to modify the users # authentication scheme, so just notify them of the problem + my %lt=&Apache::lonlocal::texthash( + 'err' => "ERROR", + 'uuas' => "This user has an unrecognized authentication scheme", + 'adcs' => "Please alert a domain coordinator of this situation" + ); $r->print(<$generalrule
$authformnop
$authformcurrent
-Activate | Role | Extent | '. - 'Start | End |
---|
'.&mt('Activate').' | '.&mt('Role').' | '.&mt('Extent').' | '. + ''.&mt('Start').' | '.&mt('End').' |
---|