From 416ab8a37f1b07dc9f6c0fb3ff1a8ff2036510b5 Mon Sep 17 00:00:00 2001
From: Sebastian Schmelzer
Date: Thu, 2 Sep 2010 17:50:49 +0200
Subject: change dir structure

---
 config-db/t/29-transaction.t | 58 --------------------------------------------
 1 file changed, 58 deletions(-)
 delete mode 100644 config-db/t/29-transaction.t

(limited to 'config-db/t/29-transaction.t')

diff --git a/config-db/t/29-transaction.t b/config-db/t/29-transaction.t
deleted file mode 100644
index 1f1566bf..00000000
--- a/config-db/t/29-transaction.t
+++ /dev/null
@@ -1,58 +0,0 @@
-use Test::More qw(no_plan);
-
-use strict;
-use warnings;
-
-use lib '/opt/openslx/lib';
-
-# basic init
-use OpenSLX::ConfigDB;
-
-my $configDB = OpenSLX::ConfigDB->new;
-$configDB->connect();
-
-my @vendorOSes = $configDB->fetchVendorOSByFilter();
-my @exports    = $configDB->fetchExportByFilter();
-my @systems    = $configDB->fetchSystemByFilter();
-my @clients    = $configDB->fetchClientByFilter();
-my @groups     = $configDB->fetchGroupByFilter();
-
-ok($configDB->startTransaction(), 'starting a transaction');
-
-ok($configDB->emptyDatabase(), 'emptying the DB');
-
-ok($configDB->rollbackTransaction(), 'rolling back the transaction');
-
-my @vendorOSes2 = $configDB->fetchVendorOSByFilter();
-my @exports2    = $configDB->fetchExportByFilter();
-my @systems2    = $configDB->fetchSystemByFilter();
-my @clients2    = $configDB->fetchClientByFilter();
-my @groups2     = $configDB->fetchGroupByFilter();
-
-is( 
-    scalar @vendorOSes2, scalar @vendorOSes, "should still have all vendor-OSes"
-);
-is(scalar @exports2, scalar @exports, "should still have all exports");
-is(scalar @systems2, scalar @systems, "should still have all systems");
-is(scalar @clients2, scalar @clients, "should still have all clients");
-is(scalar @groups2, scalar @groups, "should still have all groups");
-
-ok($configDB->startTransaction(), 'starting a transaction');
-
-ok($configDB->emptyDatabase(), 'emptying the DB');
-
-ok($configDB->commitTransaction(), 'committing the transaction');
-
-my @vendorOSes3 = $configDB->fetchVendorOSByFilter();
-my @exports3    = $configDB->fetchExportByFilter();
-my @systems3    = $configDB->fetchSystemByFilter();
-my @clients3    = $configDB->fetchClientByFilter();
-my @groups3     = $configDB->fetchGroupByFilter();
-
-is(scalar @vendorOSes3, 0, "should have no vendor-OSes");
-is(scalar @exports3, 0, "should have no exports");
-is(scalar @systems3, 1, "should have one system (default)");
-is(scalar @clients3, 1, "should have one client (default)");
-is(scalar @groups3, 0, "should have no groups");
-
-$configDB->disconnect();
-- 
cgit v1.2.3-55-g7522