Subversion Repositories wimsdev

!!don't be useful

!exit

!set n=!recordcnt mirrors.fr

!if $n<1

 !exit

!endif

!set n=$[min($n,10)]

 <p><center>

 <table border=2 bgcolor="$wims_ref_bgcolor">

 <caption>WIMS sites miroir

 <tr><th>Site<th>Lieu<th>Pays<th>Langues<br>du site<th>Commentaires

 !for i_=1 to $n

  !set l_=!record $i_ of mirrors.fr

  !distribute lines $l_ into u_,t_,C_,l_,m_,e_,r_

  !set l_=!items2words $l_

  !set l_=!words2items $l_

  <tr><td align=center>

  <a href="http://$u_">$u_</a>

  <td align=center>$t_

  <td align=center>$C_

  <td align=center>

  !for L_ in $l_

   <img src="gifs/$L_.gif" alt=$L_>

  !next L_

  <td>$r_&nbsp;

 !next i_

 </table></center><p>