bender

[scpubgit/Q-Branch.git] / maint / sqlacexpr

diff --git a/maint/sqlacexpr b/maint/sqlacexpr
index a09ce2a..ddcda1f 100755 (executable)
--- a/maint/sqlacexpr
+++ b/maint/sqlacexpr
@@ -18,4 +18,4 @@ my ($q, @bind) = $sqlac->${\$ARGV[0]}(@args);
 Dwarn [ Q => @$q ];
 
 print STDERR $q->format."\n";
-Dwarn \@bind;
+Dwarn [ 0, @bind ];