1 files changed, 1 insertions, 1 deletions
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 .= "?, ";
     }