X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/da2d9d568dda60063272ff227973f0ce18b7e65c..af131a46:/t/000setup_database.t diff --git a/t/000setup_database.t b/t/000setup_database.t index 06b9296a7..e5031d1f9 100755 --- a/t/000setup_database.t +++ b/t/000setup_database.t @@ -66,7 +66,6 @@ sub drop_and_create_database { SL::DBConnect->get_options, ); - $::auth->reset; my $dbh_template = SL::DBConnect->connect(@dbi_options) || BAIL_OUT("No database connection to the template database: " . $DBI::errstr); my $auth_dbh = $::auth->dbconnect(1); @@ -75,8 +74,6 @@ sub drop_and_create_database { $auth_dbh->disconnect; dbh_do($dbh_template, "DROP DATABASE \"" . $db_cfg->{db} . "\"", message => "Database could not be dropped"); - - $::auth->reset; } dbg("Creating database"); @@ -165,7 +162,6 @@ sub create_client_user_and_employee { signature => '', hide_cvar_search_options => '', numberformat => '1.000,00', - vclimit => 0, favorites => '', copies => '', menustyle => 'v3', @@ -179,7 +175,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;