[LON-CAPA-cvs] cvs: loncom /enrollment localenroll.pm

[albertel]

albertel		Tue Feb  7 11:36:13 2006 EDT

  Modified files:              
    /loncom/enrollment	localenroll.pm 
  Log:
  - for backwards compatability username moved to last in the ist of args
  
  
Index: loncom/enrollment/localenroll.pm
diff -u loncom/enrollment/localenroll.pm:1.12 loncom/enrollment/localenroll.pm:1.13
--- loncom/enrollment/localenroll.pm:1.12	Tue Feb  7 00:08:21 2006
+++ loncom/enrollment/localenroll.pm	Tue Feb  7 11:36:10 2006
@@ -1,6 +1,6 @@
 # functions to glue school database system into Lon-CAPA for 
 # automated enrollment
-# $Id: localenroll.pm,v 1.12 2006/02/07 05:08:21 raeburn Exp $
+# $Id: localenroll.pm,v 1.13 2006/02/07 16:36:10 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -256,8 +256,8 @@
 # (a) $authparam - the value of <autharg> from the classlist.xml files,
 # or if this blank, the default autharg, set by the domain coordinator when 
 # creating the course with loncreatecourse.pm
-# (b) $username - the username of the new user
 # (b) $dom - the domain of the new user.
+# (c) $username - the username of the new user (currently not actually used)
 #
 # Four values are returned:
 # (a) the value of $authparam - which might have been changed
@@ -286,7 +286,7 @@
 ###############################
 
 sub create_password {
-    my ($authparam,$username,$dom) = @_;
+    my ($authparam,$dom,$username) = @_;
     my $authchk = 'ok';
     my $newpasswd = '';
     my $create_passwd = 0;