X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=t%2F000setup_database.t;h=5cf6a28923055cce6a491b9cbfee7dd94072d326;hb=fee5532a132c44dcfc1743393cba00c8e3397176;hp=b4ebd13e767b568269de40258cc7c13413740cef;hpb=8317b7aa1407238c9fa8d609a1795b4ee20cb2dd;p=kivitendo-erp.git diff --git a/t/000setup_database.t b/t/000setup_database.t index b4ebd13e7..5cf6a2892 100755 --- a/t/000setup_database.t +++ b/t/000setup_database.t @@ -10,6 +10,7 @@ use Test::More; use SL::Auth; use SL::DBConnect; use SL::Form; +use SL::InstanceConfiguration; use SL::LXDebug; use SL::Layout::None; use SL::LxOfficeConf; @@ -53,6 +54,7 @@ sub setup { $::form = Form->new; $::auth = SL::Auth->new(unit_tests_database => 1); $::locale = Locale->new('de'); + $::instance_conf = SL::InstanceConfiguration->new; $db_cfg = $::lx_office_conf{'testing/database'}; } @@ -177,7 +179,7 @@ sub create_client_user_and_employee { dbh_do($dbh, $sth, bind => [ $_, $config{$_} ]) for sort keys %config; $sth->finish; - my $sth = $dbh->prepare(qq|INSERT INTO auth.group_rights (group_id, "right", granted) VALUES (1, ?, TRUE)|) || BAIL_OUT($dbh->errstr); + $sth = $dbh->prepare(qq|INSERT INTO auth.group_rights (group_id, "right", granted) VALUES (1, ?, TRUE)|) || BAIL_OUT($dbh->errstr); dbh_do($dbh, $sth, bind => [ $_ ]) for sort $::auth->all_rights; $sth->finish;