summaryrefslogtreecommitdiffstats
path: root/src/config-db/t/01-basics.t
diff options
context:
space:
mode:
Diffstat (limited to 'src/config-db/t/01-basics.t')
-rw-r--r--src/config-db/t/01-basics.t23
1 files changed, 23 insertions, 0 deletions
diff --git a/src/config-db/t/01-basics.t b/src/config-db/t/01-basics.t
new file mode 100644
index 00000000..1fb7083b
--- /dev/null
+++ b/src/config-db/t/01-basics.t
@@ -0,0 +1,23 @@
+use Test::More qw(no_plan);
+
+use lib '/opt/openslx/lib';
+
+# basic stuff
+use_ok(OpenSLX::ConfigDB);
+
+use strict;
+use warnings;
+
+# connecting and disconnecting
+ok(my $configDB = OpenSLX::ConfigDB->new, 'can create object');
+isa_ok($configDB, 'OpenSLX::ConfigDB');
+
+{
+ # create a second object - should work and yield different objects
+ ok(my $configDB2 = OpenSLX::ConfigDB->new, 'can create another object');
+ cmp_ok($configDB, 'ne', $configDB2, 'should have two different objects now');
+}
+
+ok($configDB->connect(), 'connecting');
+ok($configDB->disconnect(), 'disconnecting');
+