Rev 8320 | Rev 11222 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!if $getuser!=$empty
!sh cd $wims_home/$userdir; mv -f .$getuser $getuser 2>/dev/null
!read adm/class/mkuserlist
!read adm/class/stat
!defread wimshome/$userdir/$getuser
job=userlist
lastname=$user_lastname
firstname=$user_firstname
wims_module_log=recover $getuser
wims_class_log=Recover user $getuser by $wims_realuser
!restart module=adm/class/usermanage
!endif
del=!sh cd $wims_home/$userdir; ls .[a-zA-Z0-9]* 2>/dev/null
del=!words2items $del
deleted=
!for i in $del
j=!translate / to , in $i
j=!item -1 of $j
c=!char 1 of $j
!if $c=.
j=!char 2 to -1 of $j
deleted=!append item $j to $deleted
!endif
!next i
delcnt=!itemcnt $deleted