summaryrefslogtreecommitdiffstats
path: root/lib/Locale/POFileManager/File.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Locale/POFileManager/File.pm')
-rw-r--r--lib/Locale/POFileManager/File.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/Locale/POFileManager/File.pm b/lib/Locale/POFileManager/File.pm
index b3aa78b..64cb60c 100644
--- a/lib/Locale/POFileManager/File.pm
+++ b/lib/Locale/POFileManager/File.pm
@@ -38,6 +38,13 @@ sub save {
Locale::PO->save_file_fromarray($self->file->stringify, [$self->entries]);
}
+sub language {
+ my $self = shift;
+ my $language = $self->file->basename;
+ $language =~ s{(.*)\.po$}{$1};
+ return $language;
+}
+
sub find_missing_from {
my $self = shift;
my ($other) = @_;