Subversion Repositories wimsdev

Rev

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

  1. !if $wims_read_parm!=$empty
  2.   !set parms=$wims_read_parm
  3. !else
  4.   !if $parms=$empty
  5.     !exit
  6.   !endif
  7. !endif
  8. !set option=!item 2 of $parms
  9. !set optrecord=!getopt content in $option
  10.  
  11. !set optrecord=!declosing $optrecord
  12. !set parms=!item 1 of $parms
  13. !set data=data/glossary/$parms
  14.  
  15. !if $optrecord=abstract
  16.   !set optrecord=1
  17. !else
  18.   !if $optrecord=$empty
  19.     !set recordcnt=!recordcnt $data
  20.     !set optrecord=!values 2*x for x=2 to $[($recordcnt-1)/2]
  21.   !else
  22.     !set optrecord=!values 2*(x-1)+4 for x in $optrecord
  23.   !endif
  24. !endif
  25. !set gl_title=!getdef gl_title in $data
  26. !set gl_keywords=!getdef gl_keywords in $data
  27. !set gl_author=!getdef gl_author in $data
  28. !set gl_type=!getdef gl_type in $data
  29. !set tmp=!replace internal / by , in $data
  30. !default gl_title=!lookup $(tmp[-1]) in bases/sys/domain/domain.$(tmp[-2])
  31. <div class="wims_glossary">
  32. !if $gl_type!=dynamic
  33.   !for j in $optrecord
  34.     !if $j>=4 and $[$j%2]=0
  35.       !record $j of $data
  36.     !endif
  37.   !next
  38. !else
  39.   !read $data
  40. !endif
  41. </div>
  42.