Changeset 423

Show
Ignore:
Timestamp:
03/31/06 19:45:41
Author:
miyagawa
Message:

fix Romanizer API

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/lib/Plagger/Plugin/Filter/Romanize.pm

    r421 r423  
    1515 
    1616    my $chars = [ $self->romanize($text) ]; 
    17  
    18     foreach my $pair (@$chars) { 
    19         my ($raw, $romanized) = @$pair; 
    20         if (defined $romanized) { 
    21             $romanized =~ s/([^\/]+)\/.+$/\1/; 
    22             $result .= $romanized; 
    23             $count ++; 
    24         } else { 
    25             $result .= $raw; 
    26         } 
    27     } 
    28  
    29     return ($count, $result); 
     17    return (scalar(@$chars), join(' ', @$chars)); 
    3018} 
    3119