Subversion Repositories wimsdev

Rev

Rev 9370 | Rev 16205 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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