X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=sql-ledger%2FSL%2FNum2text.pm;h=06eee7183e8980c29f7fb0030ace93deac5dcfae;hb=refs%2Fheads%2FSQL_LEDGER;hp=f09121c2371bde45949db139b688623ec9868655;hpb=f6c9088e16c4c083174dd1130ae58d213923cdef;p=freeside.git

diff --git a/sql-ledger/SL/Num2text.pm b/sql-ledger/SL/Num2text.pm
index f09121c23..06eee7183 100644
--- a/sql-ledger/SL/Num2text.pm
+++ b/sql-ledger/SL/Num2text.pm
@@ -1,6 +1,6 @@
 #=====================================================================
 # SQL-Ledger Accounting
-# Copyright (C) 2001
+# Copyright (C) 2002
 #
 #  Author: Dieter Simader
 #   Email: dsimader@sql-ledger.org
@@ -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 @a;
   my $i;