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