title: Warning messages with Locale::Maketext::Simple
body: <p>I get these warning messages when I start my program:</p>
  
  <pre><code>Name "AAT::Translation::I18N::en_us::Lexicon" used only once: possible typo at /usr/share/perl/5.12/Locale/Maketext.pm line 404.
  Name "Win32::Locale::Lexicon" used only once: possible typo at /usr/share/perl/5.12/I18N/LangTags/Detect.pm line 140.
  </code></pre>
  
  <p>My program uses a module with <a href="http://search.cpan.org/perldoc?Locale%3a%3aMaketext%3a%3aSimple" rel="nofollow">Locale::Maketext::Simple</a>:</p>
  
  <pre><code>use Locale::Maketext::Simple(
    Path =&gt; '/usr/share/aat/Translations/'
  );
  </code></pre>
  
  <p>This directory contains my *.po files (en.po, fr.po ...)</p>
  
  <p>I didn't get any warnings before using Perl 5.12/Locale::Maketext::Simple 0.21...</p>
  
  <p>Any ideas how can I fix that ?</p>
  
  <p><strong>Edit 1:</strong> The full code</p>
  
  <pre><code>package AAT::Translation;
  
  use strict;
  use warnings;
  use Readonly;
  
  use AAT::Utils qw( NULL );
  
  my %AAT_Translation = ();
  
  use Locale::Maketext::Simple(
    Path =&gt; '/usr/share/aat/Translations/'
  );
  
  sub Init
  {
    my $lang = shift;
  
    loc_lang($lang);
    $AAT_Translation{$lang}{'_USER'} = loc("_USER");
  
    return (1);
  }
  
  sub Get
  {
    my ($lang, $str) = @_;
  
    return (undef) if (NULL($str));
    Init($lang) if (!defined $AAT_Translation{$lang}{'_USER'});
    $AAT_Translation{$lang}{$str} = (loc($str) || $str)
      if (!defined $AAT_Translation{$lang}{$str});
  
    return ($AAT_Translation{$lang}{$str});
  }
  </code></pre>
  
  <p><strong>Edit 2:</strong> Of course, if I create a link en_us.po -> en.po, I don't get "AAT::Translation::I18N::en_us::Lexicon" error messages anymore, only the "Win32::Locale::Lexicon" error messages, but that's not an option...</p>