From 2577cacd03a8c97ee2217a2ff3ef90958c94542e Mon Sep 17 00:00:00 2001 From: Michael Wagner Date: Tue, 8 Mar 2022 17:16:51 +0100 Subject: [PATCH] epic-ts --- Test/perl/test_action.pl | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/Test/perl/test_action.pl b/Test/perl/test_action.pl index 660b7f343..4e78f919f 100755 --- a/Test/perl/test_action.pl +++ b/Test/perl/test_action.pl @@ -2,9 +2,14 @@ use strict; use SL::Controller::Mebil; +use SL::DB; use SL::LXDebug; $::lxdebug = new LXDebug; +my $db = new SL::DB; + +my $dbi = $db->dbi_connect("dbname=firma;host=localhost;port=5432", "kivitendo", "kivitendo"); + my $m = new SL::Controller::Mebil; $m->action_calcmap; -- 2.20.1