X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/470a8fa1710b22e2b381eef4cacb01bebaeff725..1889a90c69d49efe8cad029c7a3b7baf6b4d0c6e:/SL/DBConnect.pm diff --git a/SL/DBConnect.pm b/SL/DBConnect.pm index fbcf1d5a1..4e084502a 100644 --- a/SL/DBConnect.pm +++ b/SL/DBConnect.pm @@ -12,7 +12,7 @@ sub connect { require Log::Log4perl; require DBIx::Log4perl; - my $filename = $LXDebug::file_name; + my $filename = $::lxdebug->file; my $config = $::lx_office_conf{debug}->{dbix_log4perl_config}; $config =~ s/LXDEBUGFILE/${filename}/g;