Subversion Repositories wimsdev

Rev

Rev 16205 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !set p_=!trim $wims_read_parm
  2. !if $p_=$empty
  3.   !exit
  4. !endif
  5. !set p_=!items2words $p_
  6. !set p_=!words2items $p_
  7.  
  8. !read lang/names.phtml.$lang
  9. !if $lang_script_exists!=yes
  10.   !read lang/names.phtml.en
  11. !endif
  12.  
  13. !reset T_
  14. !for t in $p_
  15.   !set tit=!module title_$lang tool/$t
  16.   !if $tit=
  17.     !set tit=!module title tool/$t
  18.   !endif
  19.   !if $tit!=$empty and $tit!=$module_title
  20.     !set T_=!append line $t,$tit to $T_
  21.   !endif
  22. !next t
  23. !if $T_!=$empty
  24.   !set n_=!linecnt $T_
  25.   <p>$name_prompt_tool1
  26.   !for i=1 to $n_
  27.     !set l_=!line $i of $T_
  28.     !set t_=!item 1 of $l_
  29.     !set n__=!item 2 to -1 of $l_
  30.     !set wims_ref_class=wims_button wims_button_help
  31.     !href target=wims_tool$i module=tool/$t_ $n__
  32.   !next i
  33.   <span class="small">$name_prompt_tool2</span>
  34.   </p>
  35. !endif
  36.  
  37. !reset lang_script_exists
  38.