1 files changed, 3 insertions, 0 deletions
diff --git a/LedgerSMB.pm b/LedgerSMB.pm
index eb7cca38..f1698664 100755
--- a/LedgerSMB.pm
+++ b/LedgerSMB.pm
@@ -525,6 +525,9 @@ sub round_amount {
 }
 
 sub callproc {
+	for my $arg (@_){
+		print "Callproc arg: $arg\n";
+	}
 	my $self = shift @_;
 	my $procname = shift @_;
 	my $argstr = "";