Rev 5918 | Rev 8002 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 5918 | Rev 6235 | ||
---|---|---|---|
Line 44... | Line 44... | ||
44 | !!INDEXEND |
44 | !!INDEXEND |
45 | 45 | ||
46 | !header1 |
46 | !header1 |
47 | <h1 class="wims_title"> |
47 | <h1 class="wims_title"> |
48 | <span style="text-transform:capitalize;">www |
48 | <span style="text-transform:capitalize;">www |
49 | Interactive Multipurpose Server</span><br/> |
49 | Interactive Multipurpose Server</span><br /> |
50 | <span style="font-size:small">en <a href="/">$httpd_HTTP_HOST</a></span> <br/> |
50 | <span style="font-size:small">en <a href="/">$httpd_HTTP_HOST</a></span> <br /> |
51 | $module_title</h1> |
51 | $module_title</h1> |
52 | 52 | ||
53 | !set mir=wimshome/public_html/html/mirrors.es |
53 | !set mir=wimshome/public_html/html/mirrors.es |
54 | !set thissite=!tolower $httpd_SERVER_NAME |
54 | !set thissite=!tolower $httpd_SERVER_NAME |
55 | !set n=!recordcnt $mir |
55 | !set n=!recordcnt $mir |
Line 75... | Line 75... | ||
75 | Aquí están los otros sitios WIMS que se sabe que están abiertos al |
75 | Aquí están los otros sitios WIMS que se sabe que están abiertos al |
76 | público general. Si usa normalmente WIMS en su trabajo, le sugerimos |
76 | público general. Si usa normalmente WIMS en su trabajo, le sugerimos |
77 | que añada a sus Favoritos al menos una de estas direcciones. |
77 | que añada a sus Favoritos al menos una de estas direcciones. |
78 | 78 | ||
79 | $table_header |
79 | $table_header |
80 | $table_hdtr<th>Sitio</th><th>Localización</th><th>País</th><th>Idiomas<br/>en que funciona</th><th>Comentarios</th></tr> |
80 | $table_hdtr<th>Sitio</th><th>Localización</th><th>País</th><th>Idiomas<br />en que funciona</th><th>Comentarios</th></tr> |
81 | !for i_=1 to $n |
81 | !for i_=1 to $n |
82 | !set j_=!item $i_ of $c |
82 | !set j_=!item $i_ of $c |
83 | !set l_=!record $j_ of $mir |
83 | !set l_=!record $j_ of $mir |
84 | !distribute lines $l_ into u_,t_,C_,l_,m_,e_,r_ |
84 | !distribute lines $l_ into u_,t_,C_,l_,m_,e_,r_ |
85 | !readproc mirror.proc |
85 | !readproc mirror.proc |