dbq env for db=

diff --git a/bin/dbq b/bin/dbq
index 46a35169d3f2a5536ec0b6a4410f255a5359d16b..7b711be78f8ed4d04af34bb5be5938cc4abfef47 100755 (executable)
--- a/bin/dbq
+++ b/bin/dbq
@@ -25,6 +25,7 @@ my $UC_NAME = uc($NAME);
 my %ACTION = (
   'format' => $ENV{$UC_NAME.'_FORMAT'} ? $ENV{$UC_NAME.'_FORMAT'} : 'nc',
   'action' => $ENV{$UC_NAME.'_ACTION'} ? $ENV{$UC_NAME.'_ACTION'} : 'rows',
+  'db' => $ENV{$UC_NAME.'_DB'} ? $ENV{$UC_NAME.'_DB'} : '',
   'txt_errors' => $ENV{$UC_NAME.'_TXT_ERRORS'} ? $ENV{$UC_NAME.'_TXT_ERRORS'} : '1',
 );