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

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;