Subversion Repositories wimsdev

Rev

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

Rev 4319 Rev 12155
Line 3... Line 3...
3
!set s_authors=!rows2lines $script_authors
3
!set s_authors=!rows2lines $script_authors
4
!set script_cnt=!linecnt $s_authors
4
!set script_cnt=!linecnt $s_authors
5
!set script_out=
5
!set script_out=
6
 
6
 
7
!if $module_language=cn
7
!if $module_language=cn
8
 !for s_auth = 1 to $cnscript_cnt
8
  !for s_auth = 1 to $script_cnt
9
  !set script_out=!append line $(script_authors[$s_auth;2]), $(script_authors[$s_auth;1]) to $script_out
9
    !set script_out=!append line $(script_authors[$s_auth;2]), $(script_authors[$s_auth;1]) to $script_out
10
 !next
10
  !next
11
!else
11
!else
12
 !for s_auth = 1 to $script_cnt
12
 !for s_auth = 1 to $script_cnt
13
   !if XIAO isin $(script_authors[$s_auth;1])$(script_authors[$s_auth;2])
13
   !if XIAO isin $(script_authors[$s_auth;1])$(script_authors[$s_auth;2])
14
     !set script_out=!append line $(script_authors[$s_auth;2]) $(script_authors[$s_auth;1]) to $script_out
14
     !set script_out=!append line $(script_authors[$s_auth;2]) $(script_authors[$s_auth;1]) to $script_out
15
   !else
15
   !else
16
     !set script_out=!append line $(script_authors[$s_auth;1]) $(script_authors[$s_auth;2]) to $script_out
16
     !set script_out=!append line $(script_authors[$s_auth;1]) $(script_authors[$s_auth;2]) to $script_out
17
   !endif  
17
   !endif
18
  !next
18
  !next
19
!endif
19
!endif
20
!set script_out=!lines2items $script_out
20
!set script_out=!lines2items $script_out
21
!set script_out=!nonempty items $script_out
21
!set script_out=!nonempty items $script_out
22
!set script_out=!replace internal , by ,$ $ in $(script_out)
22
!set script_out=!replace internal , by ,$ $ in $(script_out)