[Phpgroupware-cvs] CVS: wiki/parse html.php,1.9,1.10

[Ralf Becker <address@hidden>]

Update of /cvsroot/phpgroupware/wiki/parse
In directory subversions:/tmp/cvs-serv8204

Modified Files:
        html.php 
Log Message:
improved spamsave mail-addresses

Index: html.php
===================================================================
RCS file: /cvsroot/phpgroupware/wiki/parse/html.php,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** html.php    20 Mar 2003 00:46:15 -0000      1.9
--- html.php    31 Mar 2003 09:51:19 -0000      1.10
***************
*** 114,120 ****
    if (preg_match('/^mailto:(address@hidden)@(.*)$/i',$url,$matchs))   // 
spamsaver emailaddress
    {
!      $url = "mailto:$matchs[1] at $matchs[2]";
!      $onClick = " 
onClick=\"document.location='mailto:$matchs[1]'+'@'+'$matchs[2]'; return 
false;\"";
!      $text = str_replace('@',' at ',str_replace('mailto:','',$text));
    }
    return "<a href=\"$url\"$onClick>$text</a>";
--- 114,121 ----
    if (preg_match('/^mailto:(address@hidden)@(.*)$/i',$url,$matchs))   // 
spamsaver emailaddress
    {
!      $url = "#";
!      $domains = "'".implode("'+'.'+'",explode('.',$matchs[2]))."'";
!      $onClick = " 
onClick=\"document.location='mailto:$matchs[1]'+unescape('%40')+$domains; 
return false;\"";
!      $text = str_replace('@',' AT 
',str_replace('mailto:','',str_replace('.',' DOT ',$text)));
    }
    return "<a href=\"$url\"$onClick>$text</a>";