Subversion Repositories wimsdev

Rev

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

Rev 12437 Rev 12466
Line 26... Line 26...
26 
      ldata=$ldata,$(user_$(k))
 26 
      ldata=$ldata,$(user_$(k))
27 
    !next k
 27 
    !next k
28 
    !if $nbtechvar>0
 28 
    !if $nbtechvar>0
29 
      val=!column 2 of $user_vars
 29 
      val=!column 2 of $user_vars
30 
      ldata=$ldata,$val
 30 
      ldata=$ldata,$val
31 
!! seems not to be useful : user_vars has exactly nbtechvar lines
 31 
      !! seems not to be useful : user_vars has exactly nbtechvar lines
32 
!!      tmp=!linecnt $user_vars
 32 
      !!      tmp=!linecnt $user_vars
33 
!!      !for v = 1 to $[$nbtechvar-$tmp]
 33 
      !!      !for v = 1 to $[$nbtechvar-$tmp]
34 
!!        ldata=$ldata,
 34 
      !!        ldata=$ldata,
35 
!!      !next v
 35 
      !!      !next v
36 
    !endif
 36 
    !endif
37 
    !readproc adm/class/mkcomment val
 37 
    !readproc adm/class/mkcomment val
38 
    tmp=!replace internal , by , in $scriptout
 38 
    tmp=!replace internal , by , in $scriptout
39 
    ldata=$ldata,$tmp
 39 
    ldata=$ldata,$tmp
40 
    !appendfile $fileuserlist :$ldata
 40 
    !appendfile $fileuserlist :$ldata