/* Skriptoj por elskribi la pagxbazan tekston.         */
/* Pri la funkcio, vidu kasxadres.js. Pri la suba:     */
/* La unua parto de la skripto elskribas "© LSG" kaj   */
/* la kurantan jaron kaj la adreson de la retpagxo.    */
/* La span-elemento faras iometan spacon inter         */
/* "http://" kaj la retadreso por videblo.             */

/* La dua parto de la skripto estas por protekti la    */
/* retadreson kontraux spamistoj.                      */
/* Se la retumilo kapablas kurigi la skripton (la "if" */
/* kontrolas tion) gxi metas ligilon kun skripto, kiu  */
/* post klako vokas la funkcion kaj montras la ret-    */
/* adreson. Se gxi ne kapablas kurigi la skripton, gxi */
/* montras la retadreson kun '(c^e)' anstataux '@'.    */

/* La retprizorgantula retadreso trovigxu sube en du   */
/* lokoj en la formo de: 'randy.dean(&#265;e)pobox.com'.  */


function malkasxu(adres)
{
 var i,ligil,h_traf;
 var element=document.body.getElementsByTagName("a");
 var longo=element.length;
 var a_traf=adres.match(/(.*)\(.*\)(.*)/);
 if(a_traf&&a_traf[2])
   adres=a_traf[1]+a_traf[2];
 for(i=0;i<longo;i++)
 {
  ligil=element[i];
  if(ligil.href.length>0)
  {
   h_traf=ligil.href.match(/\('(.*)\(.*\)(.*)'\)/);
   if(h_traf&&h_traf[2])
   {
    if((h_traf[1]+h_traf[2])==adres)
    {
     ligil.setAttribute("href","mailto:"+h_traf[1]+"@"+h_traf[2]);
     ligil.firstChild.data=h_traf[1]+"@"+h_traf[2];
    }
   }
  }
 }
}

document.write('<p style="font-size:85%;color:#ffffff;">&copy; LSG '+new Date().getFullYear()+', http:/<span style="letter-spacing:2px;">/l</span>sg-esperanto.org, ');

if(document.createElement)
  document.write("<a href=\"javascript:malkasxu('randy.dean(&#265;e)pobox.com')\" style=\"color:#ffffff;\">retprizorganto</a>");
else
  document.write('retprizorganto: randy.dean(&#265;e)pobox.com');
