diff options
| author | ivan <ivan> | 2004-11-15 10:35:56 +0000 | 
|---|---|---|
| committer | ivan <ivan> | 2004-11-15 10:35:56 +0000 | 
| commit | 32306b5f8ffe4ce594409aa6e89626740b225a39 (patch) | |
| tree | 8dba82e8424ebe8d089b4e0ef579d87db06742a3 /sql-ledger/locale/it/Num2text | |
| parent | 52072fcd26f2faf57923f598c358e7f47c4e2643 (diff) | |
import sql-ledger 2.4.4SQL_LEDGER
Diffstat (limited to 'sql-ledger/locale/it/Num2text')
| -rw-r--r-- | sql-ledger/locale/it/Num2text | 7 | 
1 files changed, 3 insertions, 4 deletions
diff --git a/sql-ledger/locale/it/Num2text b/sql-ledger/locale/it/Num2text index fccc1d4cc..1ec24ea69 100644 --- a/sql-ledger/locale/it/Num2text +++ b/sql-ledger/locale/it/Num2text @@ -77,7 +77,7 @@ sub num2text {    my @textnumber = ();    # split amount into chunks of 3 -  my @num = reverse split //, $amount; +  my @num = reverse split //, abs($amount);    my @numblock = ();    my ($i, $appendn);    my @a = (); @@ -146,9 +146,8 @@ sub format_ten {      if ($num[1] == 0) {         $textnumber = $self->{numbername}{$amount};       } else { -	$amount = $num[0] * 10; -	$textnumber = $self->{numbername}{$amount}.$self->{numbername}{$num[1]}; -      } +      $amount = $num[0] * 10; +      $textnumber = $self->{numbername}{$amount}.$self->{numbername}{$num[1]};      }    } else {      $textnumber = $self->{numbername}{$amount};  | 
