diff options
| author | Jesse Luehrs <doy@tozt.net> | 2010-02-19 15:51:06 -0600 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2010-02-19 16:09:43 -0600 |
| commit | 5c3092f1838b4e4331dadc228aac6147a9bf24e4 (patch) | |
| tree | 3d5fe5177d448f83b2419d8fc15fcad1cffc9bbc /lib/Locale/POFileManager/File.pm | |
| parent | b899fd319a9b33107b968fa88cf982653b1bdb0a (diff) | |
| download | locale-pofilemanager-5c3092f1838b4e4331dadc228aac6147a9bf24e4.tar.gz locale-pofilemanager-5c3092f1838b4e4331dadc228aac6147a9bf24e4.zip | |
a few cleanups
Diffstat (limited to 'lib/Locale/POFileManager/File.pm')
| -rw-r--r-- | lib/Locale/POFileManager/File.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/Locale/POFileManager/File.pm b/lib/Locale/POFileManager/File.pm index fd1575b..368025b 100644 --- a/lib/Locale/POFileManager/File.pm +++ b/lib/Locale/POFileManager/File.pm @@ -40,12 +40,6 @@ sub _build_entries { return (-r $filename) ? Locale::PO->load_file_asarray($filename) : []; } -sub entry_for { - my $self = shift; - my ($msgid) = @_; - return first { $_->msgid eq '"' . $msgid . '"' } $self->entries; -} - sub add_entry { my $self = shift; if (@_ == 1) { @@ -58,6 +52,12 @@ sub add_entry { } } +sub entry_for { + my $self = shift; + my ($msgid) = @_; + return first { $_->msgid eq '"' . $msgid . '"' } $self->entries; +} + sub save { my $self = shift; |