Context Navigation

10_sql.t @ 1027

Visit:

Last change on this file since 1027 was 1027, checked in by nanardon, 12 years ago
add test to run after real configuration to fully test remote bases
File size: 380 bytes

Line
1	use strict;
2	use warnings;
3	use Test::More tests => 4;
4	use FindBin qw($Bin);
5
6	require "$Bin/config.pl";
7
8	plan skip_all => 'No SQL base defined' unless $LA::T::SQLBASE;
9
10	use_ok('LATMOS::Accounts');
11	use_ok('LATMOS::Accounts::Bases::Sql');
12
13	ok(my $la = LATMOS::Accounts->new, "Can get LATMOS::Accounts");
14	ok(my $base = $la->base($LA::T::SQLBASE), "can get SQL base $LA::T::SQLBASE");
15

Note: See TracBrowser for help on using the repository browser.