Subversion Repositories wimsdev

Rev

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

  1. !nocache
  2. !if $error!=$empty
  3.  !read docu/fr/msg.phtml
  4.  <p>
  5.  !exit
  6. !endif
  7.  
  8. <h1 class="wims_docu_title">$tit</h1>
  9.  
  10. !if $titb=$empty
  11.  <p>
  12.  Le bloc <tt>$block</tt> de ce document n'est pas encore créé.
  13. <p>
  14. !exit
  15. !endif
  16.  
  17. !if $datetest<0
  18. <p>
  19. Cette page n'est pas encore ouverte à la lecture. Revenez plus tard !
  20.  <p>
  21.  !exit
  22. !endif
  23.  
  24. !if $datetest>0
  25.  <p>
  26.  Cette page est périmée. Vous ne pouvez plus la lire. Désolé !
  27.  <p>
  28.  !exit
  29. !endif
  30.  
  31. :newblock
  32. <a name=$block></a>
  33. <h3>$titb</h3>
  34.  
  35. !read $docdir/$doc/$block.def content
  36.  
  37. !if $waitblock$(waitblock_$block)!=$empty
  38.  !set waitblock=$(waitblock_$block),$waitblock
  39.  !set waitblock=!nonempty items $waitblock
  40.  !set block=!item 1 of $waitblock
  41.  !set gotblock=!append item $block to $gotblock
  42.  !set waitblock=!item 2 to -1 of $waitblock
  43.  !read $docdir/$doc/$block.def
  44.  <p>
  45.  !goto newblock
  46. !endif
  47.