X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-queued;h=3a0a9b4e50d76a34b867ebe429f5d612a47bda4a;hb=684a478c0f88e5bf6d1d3f32f4618089146b5709;hp=b9ef09cd1c0f278b11fd9487b0e63d20a684af6f;hpb=beba6672fb9c9c5769c81f8029bb88cd2bc910e9;p=freeside.git

diff --git a/FS/bin/freeside-queued b/FS/bin/freeside-queued
index b9ef09cd1..3a0a9b4e5 100644
--- a/FS/bin/freeside-queued
+++ b/FS/bin/freeside-queued
@@ -186,7 +186,7 @@ while (1) {
     }
 
     my $eval = "&". $ljob->job. '(@args);';
-    warn "running $eval";
+    warn 'running "&'. $ljob->job. '('. join(', ', @args). ")\n" if $DEBUG;
     eval $eval; #throw away return value?  suppose so
     if ( $@ ) {
       warn "job $eval failed";