From 0ab3571374dbc1121012f2f058c8cf13993eaa2f Mon Sep 17 00:00:00 2001
From: Michael Wagner <michael@wagnertech.de>
Date: Tue, 8 Mar 2022 20:35:23 +0100
Subject: [PATCH] epic-ts

---
 Test/perl/test_action.pl | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/Test/perl/test_action.pl b/Test/perl/test_action.pl
index 904bb23bc..0f2e02ab8 100755
--- a/Test/perl/test_action.pl
+++ b/Test/perl/test_action.pl
@@ -13,16 +13,14 @@ $::lxdebug = new LXDebug;
 
 SL::DB->register_db(
   driver   => 'Pg',
-  database => 'dev_db',
+  database => 'firma',
   host     => 'localhost',
   username => 'kivitendo',
-  password => 'kivitemdo',
+  password => 'kivitendo',
 );
 
-#my $db = SL::DB::client;
-
-#my $dbh = SL::DB::dbi_connect("dbi:driver=Pg;dbname=firma;host=localhost;port=5432", "kivitendo", "kivitendo");
 my $db = SL::DB->new;
+my $dbh = $db->dbh;
 
 my $m = new SL::Controller::Mebil;
 $m->action_calcmap;
-- 
2.20.1