X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8430a44d0e84ec2608f03b361b96cb1786d8e5c7..6a12a968761127af91e9da8db7579be2836bcaaa:/SL/USTVA.pm

diff --git a/SL/USTVA.pm b/SL/USTVA.pm
index b467b427d..378f48e88 100644
--- a/SL/USTVA.pm
+++ b/SL/USTVA.pm
@@ -102,8 +102,6 @@ sub report_variables {
   # Get all positions for taxreport out of the database
   # Needs Databaseupdate Pg-upgrade2/USTVA_abstraction.pl
 
-  return unless defined wantarray;
-
   my ( $self,
        $arg_ref) = @_;
 
@@ -1032,7 +1030,7 @@ sub get_config {
 
   $form->error("Missing Parameter: @_") if !$userspath || !$filename;
 
-  $filename = "$form->{login}_$filename";
+  $filename = "$::myconfig{login}_$filename";
   $filename =~ s|.*/||;
   $filename = "$userspath/$filename";
   open my $FACONF, "<", $filename or do {# Annon Sub