Subversion Repositories wimsdev

Rev

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

  1. !if $error!=$empty
  2.  !read docu/$modu_lang/msg.phtml
  3.  <p>
  4.  !exit
  5. !endif
  6.  
  7. <h1 class="wims_docu_title">$tit</h1>
  8.  
  9. !if $titb=$empty
  10.  <p>
  11.  $name_nocreate
  12.  <p>
  13.  !exit
  14. !endif
  15.  
  16. !if $datetest<0
  17.  <p>
  18.  $name_noread
  19.  <p>
  20.  !exit
  21. !endif
  22.  
  23. !if $datetest>0
  24.  <p>
  25.  $name_expired
  26.  <p>
  27.  !exit
  28. !endif
  29.  
  30. :newblock
  31. <a name="$block"></a>
  32. <h3>$titb</h3>
  33.  
  34. !read $wims_priv_thisdoc/$block.def content
  35.  
  36. !if $waitblock$(waitblock_$block)!=$empty
  37.  !set waitblock=$(waitblock_$block),$waitblock
  38.  !set waitblock=!nonempty items $waitblock
  39.  !set block=!item 1 of $waitblock
  40.  !set gotblock=!append item $block to $gotblock
  41.  !set waitblock=!item 2 to -1 of $waitblock
  42.  !read $wims_priv_thisdoc/$block.def
  43.  <p>
  44.  !goto newblock
  45. !endif
  46.