diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-11-17 17:30:44 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-11-17 17:30:44 +0000 |
| commit | ee39f29cf48e873e015c0da8b1257097c4fb966e (patch) | |
| tree | 929a597c37bd5fb2108bf64d557841a9c90b7b2f /t/43-dbtest.t | |
| parent | 12929aa0727b4b8aa630c6d37c22cb3a3fb85d84 (diff) | |
More test cases and framework stuff. t/62-api.t is currently not working.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2403 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 't/43-dbtest.t')
| -rw-r--r-- | t/43-dbtest.t | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/t/43-dbtest.t b/t/43-dbtest.t index 812c382b..9cc9fd15 100644 --- a/t/43-dbtest.t +++ b/t/43-dbtest.t @@ -1,11 +1,17 @@ use Test::More; use strict; -if (!defined $ENV{PGDATABASE}){ - plan skip_all => 'PGDATABASE Environment Variable not set up'; +if (!defined $ENV{LSMB_TEST_DB}){ + plan skip_all => 'Skipping all. Told not to test db.'; } else { plan tests => 50; + if (defined $ENV{LSMB_NEW_DB}){ + $ENV{PGDATABASE} = $ENV{LSMB_NEW_DB}; + } + if (!defined $ENV{PGDATABASE}){ + die "We were told to run tests, but no database specified!"; + } } my @testscripts = qw(Account Business_type Company Draft Payment |