Subversion Repositories wimsdev

Rev

Rev 12811 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12811 Rev 17180
Line 42... Line 42...
42
!!INDEXEND
42
!!INDEXEND
43
 
43
 
44
!header1
44
!header1
45
<h1 class="wims_title">
45
<h1 class="wims_title">
46
  <span style="text-transform:capitalize;">www
46
  <span style="text-transform:capitalize;">www
47
  Interactive Multipurpose Server</span><br />
47
  Interactive Multipurpose Server</span><br>
48
  <span style="font-size:small">à <a href="/">$httpd_HTTP_HOST</a></span><br />
48
  <span style="font-size:small">à <a href="/">$httpd_HTTP_HOST</a></span><br>
49
  $module_title
49
  $module_title
50
</h1>
50
</h1>
51
!set mir=wimshome/public_html/html/mirrors.fr
51
!set mir=wimshome/public_html/html/mirrors.fr
52
!set thissite=!tolower $httpd_SERVER_NAME
52
!set thissite=!tolower $httpd_SERVER_NAME
53
!set n=!recordcnt $mir
53
!set n=!recordcnt $mir
Line 74... Line 74...
74
 WIMS régulièrement dans votre travail, nous suggérons que vous bookmarquiez
74
 WIMS régulièrement dans votre travail, nous suggérons que vous bookmarquiez
75
 au moins une partie de ces adresses ; ainsi, si votre site préféré
75
 au moins une partie de ces adresses ; ainsi, si votre site préféré
76
 tombe en panne momentanément, vous pourrez utiliser un de ces sites en remplacement pour votre travail.
76
 tombe en panne momentanément, vous pourrez utiliser un de ces sites en remplacement pour votre travail.
77
 
77
 
78
 $table_header
78
 $table_header
79
 $table_hdtr<th>Site</th><th>Lieu</th><th>Pays</th><th>$wims_name_Language<br />du site</th><th>$wims_name_comment</th></tr>
79
 $table_hdtr<th>Site</th><th>Lieu</th><th>Pays</th><th>$wims_name_Language<br>du site</th><th>$wims_name_comment</th></tr>
80
 !for i_=1 to $n
80
 !for i_=1 to $n
81
  !set j_=!item $i_ of $c
81
  !set j_=!item $i_ of $c
82
  !set l_=!record $j_ of $mir
82
  !set l_=!record $j_ of $mir
83
  !distribute lines $l_ into u_,t_,C_,l_,m_,e_,r_
83
  !distribute lines $l_ into u_,t_,C_,l_,m_,e_,r_
84
  !readproc mirror.proc
84
  !readproc mirror.proc
Line 86... Line 86...
86
  <a href="$u_">$U_</a></td>
86
  <a href="$u_">$U_</a></td>
87
  <td>$t_</td>
87
  <td>$t_</td>
88
  <td>$C_</td>
88
  <td>$C_</td>
89
  <td>
89
  <td>
90
  !for L_ in $l_
90
  !for L_ in $l_
91
   <img src="gifs/$L_.gif" alt="$L_.gif" height="16" />
91
   <img src="gifs/$L_.gif" alt="$L_.gif" height="16">
92
  !next L_
92
  !next L_
93
!!  <td align="center">!mailurl n$e_ $m_\nWIMS site
93
!!  <td align="center">!mailurl n$e_ $m_\nWIMS site
94
  </td><td>$r_&nbsp;</td></tr>
94
  </td><td>$r_&nbsp;</td></tr>
95
 !next i_
95
 !next i_
96
 $table_end
96
 $table_end