Subversion Repositories wimsdev

Rev

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

  1. !set p_=!trim $wims_read_parm
  2. !if $p_=$empty or ($wims_user!=$empty and $wims_user!=supervisor)
  3.   !exit
  4. !endif
  5.  
  6. !read lang/names.phtml.$lang
  7. !if $lang_script_exists!=yes
  8.   !read lang/names.phtml.en
  9. !endif
  10.  
  11. !set cat_=!listintersect $module_category and exercise,tool,recreation
  12. !for c in $cat_
  13.   <p>$name_prompt_related
  14.   !for t in $p_
  15.     !set t=!declosing $t
  16.     !set t_=!lookup $(t[1]) in bases/sys/domain/domain.$lang
  17.     !default t_=$t
  18.     !set wims_ref_class=wims_label
  19.     !href module=home&search_category=$c&search_keywords=$t_&$(t[2..-1]) $t_
  20.     &nbsp;
  21.   !next t
  22.   </p>
  23. !next c
  24.