From 32306b5f8ffe4ce594409aa6e89626740b225a39 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 15 Nov 2004 10:35:56 +0000
Subject: import sql-ledger 2.4.4

---
 sql-ledger/SL/Num2text.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'sql-ledger/SL/Num2text.pm')

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;
-- 
cgit v1.2.1