Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv3632
Modified Files:
sandweb-admin
Log Message:
fixed a bug with add-user
Index: sandweb-admin
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb-admin,v
retrieving revision 1.7
retrieving revision 1.8
diff -U2 -r1.7 -r1.8
--- sandweb-admin 2001/10/07 14:16:57 1.7
+++ sandweb-admin 2001/10/20 05:40:35 1.8
@@ -83,4 +83,10 @@
}
+ $max_uid++;
+ open(PW, ">>$passwd_file") or
+ fexit('26', "Unable to open $passwd_file : $!");
+ print PW "$name:$max_uid:$enc_pwd\n";
+ close PW;
+
# added user's sandbox dir
@@ -100,10 +106,4 @@
fexit('28', "Unable to create $name.\n");
}
-
- $max_uid++;
- open(PW, ">>$passwd_file") or
- fexit('26', "Unable to open $passwd_file : $!");
- print PW "$name:$max_uid:$enc_pwd\n";
- close PW;
exit 0;
|
