[freeside-commits] freeside/FS/FS/L10N DBI.pm, NONE, 1.1 en_us.pm, NONE, 1.1 iw_il.pm, NONE, 1.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/L10N
In directory wavetail.420.am:/tmp/cvs-serv17949/L10N

Added Files:
	DBI.pm en_us.pm iw_il.pm 
Log Message:
i18n, RT#12515

--- NEW FILE: en_us.pm ---
package FS::L10N::en_us;
use base qw(FS::L10N);
#use strict;

our %Lexicon = ( _AUTO=>1 );

1;

--- NEW FILE: DBI.pm ---
package FS::L10N::DBI;
use base qw(FS::L10N);
use strict;
use FS::Msgcat;

our %Lexicon = ();

sub maketext {
  my($lh, $key, @rest) = @_;

  unless ( exists $Lexicon{$key} ) {
    my $lang = $lh->language_tag;
    $lang =~ s/-(\w*)/_\U$1/;
    $Lexicon{$key} = FS::Msgcat::_gettext( $key, $lang );
  }

  $lh->SUPER::maketext($key, @rest);

}

1;


--- NEW FILE: iw_il.pm ---
package FS::L10N::iw_il;
use base qw(FS::L10N::DBI);

1;