Subversion Repositories wimsdev

Rev

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

Rev 14156 Rev 14164
Line 42... Line 42...
42
      list=`ls -r $cdir/exolog/$checkuser | tail -n +$[$wims_class_exolog+1]`\
42
      list=`ls -r $cdir/exolog/$checkuser | tail -n +$[$wims_class_exolog+1]`\
43
      if [ ! -z "$$list" ]; then rm -f $cdir/exolog/$checkuser/$$list; fi
43
      if [ ! -z "$$list" ]; then rm -f $cdir/exolog/$checkuser/$$list; fi
44
    job=list
44
    job=list
45
    !! replace the name of images by rename by the true name when saving
45
    !! replace the name of images by rename by the true name when saving
46
    rename_list =!record 0 of wimshome/$wims_sesdir/.rename
46
    rename_list =!record 0 of wimshome/$wims_sesdir/.rename
47
    !debug $rename_list
-
 
48
    rename_list_cnt=!linecnt $rename_list
47
    rename_list_cnt=!linecnt $rename_list
49
    !for l=1 to $rename_list_cnt
48
    !for l=1 to $rename_list_cnt
50
      rename_l=!line $l of $rename_list
49
      rename_l=!line $l of $rename_list
51
      rename_l=!replace internal : by , in $rename_l
50
      rename_l=!replace internal : by , in $rename_l
52
      rename_l=!replace internal ? by \? in $rename_l
51
      rename_l=!replace internal ? by \? in $rename_l