Changeset 92

Show
Ignore:
Timestamp:
04/13/05 08:28:46
Author:
tobias
Message:

fix for ticket #35

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plugins/spamlookup/mt-spamlookup.cgi

    r91 r92  
    605605    if($service =~ /%ip%/) { 
    606606        foreach (@data) { 
    607             my $dest = $service; 
    608             $dest =~ s/%ip%/$_->{ipaddr}/eg; 
    609             $_->{iptext} = qq{<a href="$dest">$_->{ipaddr}</a>}; 
     607            $_->{iptext} = wrap_ip_service($service,$_->{ipaddr}); 
    610608        } 
    611609    } 
    …… 
    614612    $app->build_page('view_cache.tmpl', \%param); 
    615613} 
     614 
     615sub wrap_ip_service { 
     616    $DB::single=1; 
     617    my $dest = shift; 
     618    my $ip = shift; 
     619    $dest =~ s/%ip%/$ip/eg; 
     620    return qq{<a href="$dest">$ip</a>}; 
     621} 
     622 
    616623 
    617624sub unban_ip { 
    …… 
    790797            my $ip=$log->ip; 
    791798            if(defined($service)) { 
    792                 my $dest = $service; 
    793                 $dest =~ s/%ip%/$ip/eg; 
    794                 $ip=qq{<a href="$dest">$ip</a>}; 
     799                $ip = wrap_ip_service($service,$ip); 
     800                $msg =~ s{(\d+\.\d+\.\d+\.\d+)}{wrap_ip_service($service,$1)}ge; 
    795801            } 
    796802            unshift(@log,{ 

  • trunk/plugins/spamlookup/tmpl/logs.tmpl

    r91 r92  
    3030<td><span title="<TMPL_VAR NAME=LOG_DATE>"><TMPL_VAR NAME=LOG_RELATIVE_DATE></span></td> 
    3131<td><TMPL_VAR NAME=LOG_IP></td> 
    32 <td><TMPL_VAR NAME=LOG_MESSAGE ESCAPE=HTML></td> 
     32<td><TMPL_VAR NAME=LOG_MESSAGE></td> 
    3333</tr> 
    3434</TMPL_LOOP>