Subversion Repositories wimsdev

!nocache

!if $error!=$empty

 !read docu/fr/msg.phtml

 <p>

 !exit

!endif

<h1 class="wims_docu_title">$tit</h1>

!if $titb=$empty

 <p>

 Le bloc <tt>$block</tt> de ce document n'est pas encore créé.

 <p>

 !exit

!endif

!if $datetest<0

 <p>

 Cette page n'est pas encore ouverte à la lecture. Revenez plus tard !

 <p>

 !exit

!endif

!if $datetest>0

 <p>

 Cette page est périmée. Vous ne pouvez plus la lire. Désolé !

 <p>

 !exit

!endif

:newblock

<a name=$block></a>

<h3>$titb</h3>

!read $docdir/$doc/$block.def content

!if $waitblock$(waitblock_$block)!=$empty

 !set waitblock=$(waitblock_$block),$waitblock

 !set waitblock=!nonempty items $waitblock

 !set block=!item 1 of $waitblock

 !set gotblock=!append item $block to $gotblock

 !set waitblock=!item 2 to -1 of $waitblock

 !read $docdir/$doc/$block.def

 <p>

 !goto newblock

!endif