Changeset 172

Show
Ignore:
Timestamp:
02/27/06 00:28:28
Author:
miyagawa
Message:

use strict && spacing fix.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/lib/Plagger/Plugin/Publish/Speech/Win32.pm

    r171 r172  
    22use base qw( Plagger::Plugin::Publish::Speech ); 
    33 
     4use strict; 
    45use Encode; 
    56use Locale::Country; 
    …… 
    3637    my $gender = $self->conf->{voice} || 'male'; 
    3738    my @try_gender  = $gender =~ /^male$/i ? (1, 2) : (2, 1); 
    38      
    39     TRY: for my $gender (@try_gender) { 
     39 
     40 TRY: for my $gender (@try_gender) { 
    4041        for my $i (1 .. $voice->CountEngines) { 
    4142            if ( $voice->LanguageID($i) == $code && $voice->Gender($i) == $gender ) {