From db3e35002f922a80bf93ab5b5da09d2b352681d1 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Fri, 19 Oct 2007 18:47:03 +0000
Subject: GL Vouchers are posting and saving correctly.  Need to get listing
 and approving but that is conceptually a lot easier and involves a lot less
 legacy code

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1796 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'LedgerSMB.pm')

diff --git a/LedgerSMB.pm b/LedgerSMB.pm
index 9ca12b2f..99a3d994 100755
--- a/LedgerSMB.pm
+++ b/LedgerSMB.pm
@@ -535,7 +535,7 @@ sub call_procedure {
     my @results;
 
     $procname = $self->{dbh}->quote_identifier($procname);
-
+    print STDERR join(':', @call_args) . "\n";
     for ( 1 .. scalar @call_args ) {
         $argstr .= "?, ";
     }
-- 
cgit v1.2.3