Changeset 2709

Show
Ignore:
Timestamp:
04/30/05 01:00:55 (3 years ago)
Author:
morris
Message:

Split multiple words in highlight pattern.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • animanga/trunk/lib/Animanga/Filters.pm

    r2587 r2709  
    262262 
    263263                if($pattern) { 
    264                         $text =~ s/($pattern)/ 
    265                                 my $out; 
    266                                 $a->display("tag-highlight", {text => $1}, \$out); 
    267                                 $out; 
    268                         /egi; 
     264                        my @patterns = split(/\s/, $pattern); 
     265 
     266                        foreach (@patterns) { 
     267                                $text =~ s/(\b$_\b)/ 
     268                                        my $out; 
     269                                        $a->display("tag-highlight", {text => $1}, \$out); 
     270                                        $out; 
     271                                /egi; 
     272                        } 
    269273                } 
    270274