summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2010-02-18 12:25:39 -0600
committerJesse Luehrs <doy@tozt.net>2010-02-18 12:25:39 -0600
commitaba3b022ac0a7c86d2311d9884439979d5f649bd (patch)
tree69a22b73c98926ce50c05bef0804a938eb68fdad
parente7b0afa2f7b8cd45bfea000f2d2238497ce0f982 (diff)
downloadlocale-pofilemanager-aba3b022ac0a7c86d2311d9884439979d5f649bd.tar.gz
locale-pofilemanager-aba3b022ac0a7c86d2311d9884439979d5f649bd.zip
minor fixups
-rw-r--r--lib/Locale/POFileManager.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Locale/POFileManager.pm b/lib/Locale/POFileManager.pm
index 87c01ae..67a63d9 100644
--- a/lib/Locale/POFileManager.pm
+++ b/lib/Locale/POFileManager.pm
@@ -42,7 +42,7 @@ sub _build_files {
my @files;
for my $file ($dir->children) {
- next unless $file->is_file;
+ next if $file->is_dir;
next unless $file->stringify =~ /\.po$/;
push @files, Locale::POFileManager::File->new(file => $file);
}
@@ -95,7 +95,7 @@ sub canonical_language_file {
my $lang = $self->canonical_language;
return $self->first_file(sub {
- $_->file->language eq $lang;
+ $_->language eq $lang;
});
}
@@ -105,7 +105,7 @@ sub find_missing {
my %ret;
for my $file ($self->files) {
- $ret{$file->language} = $file->find_missing_from($canon_file);
+ $ret{$file->language} = [$file->find_missing_from($canon_file)];
}
return %ret;