Changeset 424
- Timestamp:
- 03/31/06 19:47:52
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger/Plugin/Filter/Romanize.pm
r423 r424 14 14 my $count = 0; 15 15 16 my $chars = [ $self->romanize($text) ];17 return (scalar(@ $chars), join(' ', @$chars));16 my @chars = $self->romanize($text); 17 return (scalar(@chars), join(' ', @chars)); 18 18 } 19 19 trunk/plagger/lib/Plagger/Plugin/Filter/Romanize/Japanese.pm
r422 r424 12 12 $self->{roman} ||= Text::Kakasi->new(qw/-Ha -Ka -Ja -Ea -ka -iutf8/); 13 13 my @wakati = split /\s+/, $self->{wakati}->get( encode("utf-8", $text) ); 14 [ map $self->{roman}->get($_), @wakati ];14 map $self->{roman}->get($_), @wakati; 15 15 } 16 16
