Subject: | warn at commands jifty model,schema from Jifty::I18N ligne 204 |
warns at commands jifty model,schema from Jifty::I18N ligne 204
Perl version ActivePerl-5.10.1004-MSW32-86
Os XP Pro (2002) SP3
Subject: | I18N.err.txt |
2008 Dec 27
Perl : version ActivePerl-5.10.1004-MSW32-86
Os : XP Pro (2002) SP3
at commands : jifty model,schema
WARN - Use of uninitialized value in sort at C:/Perl/site/lib/Jifty/I18N.pm line 204.
----------------------------------------------------------------------------
sub refresh {
my $modified = join(
',',
# sort map { $_ => -M $_ } map { glob("$_/*.po") } ( Jifty->config->framework('L10N')->{'PoDir'}, Jifty->config->framework('L10N')->{'DefaultPoDir'}
sort map { $_ => -M $_ } map { glob($_) } _get_file_patterns()
);
if ($modified ne $LAST_MODIFED) {
Jifty::I18N->new;
$LAST_MODIFED = $modified;
}
}
-----------------------------------------------------------------------------
but it seems OK when we used the commented statement :
------------------------------------------------------------------------------
sort map { $_ => -M $_ } map { glob("$_/*.po") } ( Jifty->config->framework('L10N')->{'PoDir'}, Jifty->config->framework('L10N')->{'DefaultPoDir'})) ;