clean things up and better sqlacexpr

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

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