diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-10-07 19:38:59 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-10-07 19:38:59 +0000 |
commit | f073dc59a9a1323b14c61941661d69ac44e6ce64 (patch) | |
tree | d84fb15d5b4d7c51894c24700878790dfdd975e9 /LedgerSMB | |
parent | b803dd40bf9852c38b232ddb6362bdc6fc13dd2d (diff) |
Adding seemless num2text support for 1.3-framework elements
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2355 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rw-r--r-- | LedgerSMB/Num2text.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/Num2text.pm b/LedgerSMB/Num2text.pm index 89c7c41a..57accc3b 100644 --- a/LedgerSMB/Num2text.pm +++ b/LedgerSMB/Num2text.pm @@ -44,7 +44,7 @@ use utf8; sub init { my $self = shift; - my $locale = $self->{'locale'}; + my $locale = $self->{'locale'} || $self->{'_locale'}; my $langtag = substr( $locale->language_tag, 0, 2 ); $self->{'numrules'} = 'en'; $self->{'numrules'} = $langtag |