Subversion Repositories wimsdev

Rev

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

Rev 12159 Rev 12161
Line 11... Line 11...
11 
  Userdef=!replace wimshome/ by $wims_home/ in $userdef
 11 
  Userdef=!replace wimshome/ by $wims_home/ in $userdef
12 
  test=!defof user_exists in $userdef
 12 
  test=!defof user_exists in $userdef
13 
  !if $test=yes
 13 
  !if $test=yes
14 
    erased=!replace internal .users/ by .users/. in $Userdef
 14 
    erased=!replace internal .users/ by .users/. in $Userdef
15 
    !sh mv -f $Userdef $erased 2>/dev/null
 15 
    !sh mv -f $Userdef $erased 2>/dev/null
16 
    !read adm/class/global_vars.def
 16 
    folder_list=!defof USER_DIR_LIST in wimshome/public_html/bases/sys/define.conf
17 
    !for folder in $user_dir_list
 17 
    !for folder in $folder_list
18 
      !sh for a in `find $wims_home/log/classes/$delu_class/$folder -name '$uu.*'`; do \
 18 
      !sh for a in `find $wims_home/log/classes/$delu_class/$folder -name '$uu.*'`; do \
19 
        aa=`echo $$a | sed -e "s/$uu/.$uu/"`; mv -f $$a $$aa; done\
 19 
        aa=`echo $$a | sed -e "s/$uu/.$uu/"`; mv -f $$a $$aa; done\
20 
       for a in `find $wims_home/log/classes/$delu_class/$folder -name '$uu'`; do \
 20 
       for a in `find $wims_home/log/classes/$delu_class/$folder -name '$uu'`; do \
21 
        aa=`echo $$a | sed -e "s/$uu/.$uu/"`; mv -f $$a $$aa; done
 21 
        aa=`echo $$a | sed -e "s/$uu/.$uu/"`; mv -f $$a $$aa; done
22 
    !next
 22 
    !next