Subversion Repositories wimsdev

Rev

Rev 8306 | Rev 8320 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8306 Rev 8318
Line 1... Line 1...
1 
 
 1 
 
2 
!if $getuser!=$empty
 2 
!if $getuser!=$empty
3 
 !sh cd $wims_home/$userdir; mv -f .$getuser $getuser 2>/dev/null
 3 
 !sh cd $wims_home/$userdir; mv -f .$getuser $getuser 2>/dev/null
4 
 !read adm/class/mkuserlist
 4 
 !read adm/class/mkuserlist
5 
 !defread wimshome/$userdir/$getuser
 5 
 !defread wimshome/$userdir/$getuser
6 
 job=getuser
 6 
 job=userlist
7 
 lastname=$user_lastname
 7 
 lastname=$user_lastname
8 
 firstname=$user_firstname
 8 
 firstname=$user_firstname
9 
 wims_module_log=recover $getuser
 9 
 wims_module_log=recover $getuser
10 
 wims_class_log=Recover user $getuser by $wims_realuser
 10 
 wims_class_log=Recover user $getuser by $wims_realuser
11 
 !changeto var.proc.getuser
 11 
 !restart module=adm/class/usermanage
12 
!endif
 12 
!endif
13 
 
 13 
 
14 
del=!sh cd $wims_home/$userdir; ls .[a-zA-Z0-9]* 2>/dev/null
 14 
del=!sh cd $wims_home/$userdir; ls .[a-zA-Z0-9]* 2>/dev/null
15 
del=!words2items $del
 15 
del=!words2items $del
16 
 
 16