Subversion Repositories wimsdev

Rev

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

Rev 14109 Rev 14113
Line 30... Line 30...
30
list_=!replace item number $source_ by $empty in $list_
30
list_=!replace item number $source_ by $empty in $list_
31
!if $target_!=$empty
31
!if $target_!=$empty
32
  !if $target_=0
32
  !if $target_=0
33
    list_=$source_,$list_
33
    list_=$source_,$list_
34
  !else
34
  !else
-
 
35
    !if $target_=$[$ecnt_+1]
-
 
36
      list_=$list_,$source_
-
 
37
    !else
35
    list_=!replace item $target_ by $target_,$source_ in $list_
38
      list_=!replace item $target_ by $target_,$source_ in $list_
-
 
39
    !endif
36
  !endif
40
  !endif
37
!endif
41
!endif
38
list_=!nonempty item $list_
42
list_=!nonempty item $list_
39
mlist_=$empty
43
mlist_=$empty
40
!for i_=1 to $ecnt_
44
!for i_=1 to $ecnt_