X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a2ab888de6fd1664a7b902ea1aad37b42872f4cc..87eebe6:/SL/IC.pm

diff --git a/SL/IC.pm b/SL/IC.pm
index 96e3a94a1..74cfe1702 100644
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -1632,8 +1632,8 @@ sub prepare_parts_for_printing {
   my $self     = shift;
   my %params   = @_;
 
-  my $myconfig = \%main::myconfig;
-  my $form     = $main::form;
+  my $myconfig = $params{myconfig} || \%main::myconfig;
+  my $form     = $params{form}     || $main::form;
 
   my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);