Subversion Repositories wimsdev

Rev

Rev 1406 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1406 Rev 1625
Line 41... Line 41...
41 
list=!replace internal _ by $ $ in $(listfinal)
 41 
list=!replace internal _ by $ $ in $(listfinal)
42 
new_data=!append line $list to $new_data
 42 
new_data=!append line $list to $new_data
43 
!writefile wimshome/log/classes/$wims_class/seq/.sequence$seq $new_data\
 43 
!writefile wimshome/log/classes/$wims_class/seq/.sequence$seq $new_data\
44 
$visible
 44 
$visible
45 
 
 45 
 
- 
 
 46 
s_ =!record 0 of .sequences
- 
 
 47 
s_=!line 2 to -1 of s_
46 
!if $seq= $[$seq_cnt+1]
 48 
!if $seq= $[$seq_cnt+1]
47 
 seq_cnt=$[$seq_cnt+1]
 49 
 seq_cnt=$[$seq_cnt+1]
48 
 !writefile wimshome/log/classes/$wims_class/seq/.sequences $seq_cnt
 50 
 !writefile wimshome/log/classes/$wims_class/seq/.sequences $seq_cnt\
- 
 
 51 
 $s_
49 
!endif
 52 
!endif
50 
 
 53