Rev 4349 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4349 | Rev 13585 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !if $wims_read_parm!=slib_header |
1 | !if $wims_read_parm!=slib_header |
2 | !goto proc |
2 | !goto proc |
3 | !endif |
3 | !endif |
4 | 4 | ||
5 | slib_author=Gang, XIAO |
5 | slib_author=Gang, XIAO |
6 | 6 | ||
7 | slib_example= 3,4,8,fr\ |
7 | slib_example= 3,4,8,fr\ |
8 | 3,4,8,en\ |
8 | 3,4,8,en\ |
9 | 3,4,8,es |
9 | 3,4,8,es |
10 | !exit |
10 | !exit |
11 | 11 | ||
12 | :proc |
12 | :proc |
13 | slib_lang=!item -1 of $wims_read_parm |
13 | slib_lang=!item -1 of $wims_read_parm |
14 | slib_lang_save=$module_language |
14 | slib_lang_save=$module_language |
15 | !if $slib_lang iswordof $wims_site_languages |
15 | !if $slib_lang iswordof $wims_site_languages |
16 | slib_lens=!item 1 to -2 of $wims_read_parm |
16 | slib_lens=!item 1 to -2 of $wims_read_parm |
17 | module_language=$slib_lang |
17 | module_language=$slib_lang |
18 | !else |
18 | !else |
19 | slib_lens=$wims_read_parm |
19 | slib_lens=$wims_read_parm |
20 | !endif |
20 | !endif |
21 | slib_lens=!items2words $slib_lens |
21 | slib_lens=!items2words $slib_lens |
22 | slib_out=!exec randic $slib_lens |
22 | slib_out=!exec randic $slib_lens |
23 | slib_out=!singlespace $slib_out |
23 | slib_out=!singlespace $slib_out |
24 | module_language=$slib_lang_save |
24 | module_language=$slib_lang_save |
25 | - |