bin/dbq pipe stdout

diff --git a/bin/dbq b/bin/dbq
index 6985d097ac039c5c849f8175a7432d932d57b420..db78c7e5335ba9076cb96b0f9bdf4bae54a84af5 100755 (executable)
--- a/bin/dbq
+++ b/bin/dbq
@@ -34,7 +34,7 @@ my %PARAM = (
   'txt_errors' => $ENV{$UC_NAME.'_TXT_ERRORS'} ? $ENV{$UC_NAME.'_TXT_ERRORS'} : '1',
 );
 
-$PARAM{'format'} = 'text' unless -t  STDOUT;
+$PARAM{'format'} = 'csv' unless -t  STDOUT;
 %PARAM = map {$_=>$PARAM{$_}} grep {$PARAM{$_} ne ''} keys %PARAM;
 if ($ENV{$UC_NAME.'_PARAMS'}) {
   for (split(' ',$ENV{$UC_NAME.'_PARAMS'})) {