Subversion Repositories wimsdev

!nocache

!if $error!=$empty

 !read docu/fr/msg.phtml

 <p>

 !exit

!endif

<center><h1>$tit</h1></center>

!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>

<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

</div><div class=wimstail>

<p><hr>

<table width="100%" border=0 cellspan=0 cellpadding=1>

<tr><td align=left nowrap><small>

Par

!if $email=$empty

 $author

!else

 !mailurl $email $author

!endif

!! ©

<td align=right><small>

!href cmd=reply&job=read&doc=$doc&block=$startblock Version interactive

!if $wims_user=supervisor and $sheetdata!=$empty

 <tr><td align=left nowrap>

 <small>Dernière modif. $datm

 <td align=right><small>

 !href cmd=reply&job=exosource&block=$startblock Source d'exercice de la page

 </small>

!else

 <tr><td align=left colspan=2 nowrap>

 <small>Dernière modif. $datm

!endif

</table>