From 7daaaab84d59665bd34b01d8eed61ac0e53c435a Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Fri, 19 Feb 2010 13:35:33 -0600 Subject: add a language_file method to get a specific language file --- lib/Locale/POFileManager.pm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/Locale/POFileManager.pm b/lib/Locale/POFileManager.pm index ea906c1..4665723 100644 --- a/lib/Locale/POFileManager.pm +++ b/lib/Locale/POFileManager.pm @@ -126,15 +126,20 @@ sub add_language { $self->_add_file($pofile); } -sub canonical_language_file { +sub language_file { my $self = shift; - my $lang = $self->canonical_language; + my ($lang) = @_; return $self->first_file(sub { $_->language eq $lang; }); } +sub canonical_language_file { + my $self = shift; + return $self->language_file($self->canonical_language); +} + sub find_missing { my $self = shift; my $canon_file = $self->canonical_language_file; -- cgit v1.2.3-54-g00ecf