Subversion Repositories wimsdev

Rev

Rev 4158 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

!if $wims_read_parm!=slib_header
 !goto proc
!endif

slib_author=Gang, XIAO

slib_example= 3,4,8,fr\
 3,4,8,en\
  3,4,8,es
!exit

:proc
slib_lang=!item -1 of $wims_read_parm
slib_lang_save=$module_language
!if $slib_lang iswordof $wims_site_languages
 slib_lens=!item 1 to -2 of $wims_read_parm
 module_language=$slib_lang
!else
 slib_lens=$wims_read_parm
!endif
slib_lens=!items2words $slib_lens
slib_out=!exec randic $slib_lens
slib_out=!singlespace $slib_out
module_language=$slib_lang_save