Subversion Repositories wimsdev

Rev

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

  1.  
  2. !! the next line doesn't work from everywhere (for example,
  3. !! when executing an exercise in a sheet so ... copy paste for the moment
  4. !! must be the same as scripts/adm/oneitem.phtml
  5. !!##!changeto adm/oneitem.phtml $wims_read_parm
  6. !if $wims_theme_icon=yes
  7.  !set  wims_theme_icon=$wims_theme
  8. !endif
  9. !distribute items $wims_read_parm into 1_,2_,3_,4_
  10. !reset w_image
  11. !if " isin $1_
  12.  !set w_name=!replace internal " by in $1_
  13. !else
  14.  !set w_name1=!word 1 of $1_
  15.  !set w_name2=!word 2 to -1 of $1_
  16.  !set w_name=$(wims_name_$(w_name1)) $w_name2
  17.  !if $w_name issametext
  18.    !set w_name=$1_
  19.  !endif
  20. !! !if $wims_theme_icon!=$empty
  21. !!   !set w_image=<img border=0 src="gifs/themes/$wims_theme_icon/$w_name1.gif" alt="$1_" title="$_">
  22. !! !endif
  23. !endif
  24. !goto $2_
  25. :0
  26. $(wims_read_parm[3..-1])
  27. !exit
  28. :1
  29. !set 3_=!item 3 to -1 of $wims_read_parm
  30. !set 3_=!nospace $3_
  31. !set wims_ref_class=$w_name1
  32. !href $3_ $w_name
  33. !exit
  34. :2
  35. !if $4_ notsametext
  36.  <a href="$3_" target="wims_$4_" class="$w_name1"><span class="text_item">$w_name</span></a>
  37. !else
  38.  <a href="$3_" class="$w_name1"><span class="text_item">$w_name</span></a>
  39. !endif
  40. !exit
  41. :3
  42. <a href="#" onclick="$3_" class="$w_name1"><span class="text_item">$w_name</span></a>
  43. !exit
  44. :4
  45. !set wims_ref_class=$w_name1
  46. !href target=wims_$4_ $3_ <span class="text_item">$w_name</span>
  47. !exit
  48. :*
  49.