X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0c28bb82b805b07543debaf08061b58d0b437c07..2e66dde525c12d064518c316d25a6b41ed727b39:/SL/BackgroundJob/CreatePeriodicInvoices.pm diff --git a/SL/BackgroundJob/CreatePeriodicInvoices.pm b/SL/BackgroundJob/CreatePeriodicInvoices.pm index 474762d86..0817ae6c6 100644 --- a/SL/BackgroundJob/CreatePeriodicInvoices.pm +++ b/SL/BackgroundJob/CreatePeriodicInvoices.pm @@ -8,6 +8,7 @@ use Config::Std; use English qw(-no_match_vars); use SL::DB::AuthUser; +use SL::DB::Default; use SL::DB::Order; use SL::DB::Invoice; use SL::DB::PeriodicInvoice; @@ -64,9 +65,9 @@ sub run { } sub _log_msg { - # my $message = join('', @_); - # $message .= "\n" unless $message =~ m/\n$/; - # $::lxdebug->message(0, $message); + my $message = join('', @_); + $message .= "\n" unless $message =~ m/\n$/; + $::lxdebug->message(LXDebug::DEBUG1(), $message); } sub _generate_time_period_variables { @@ -202,7 +203,7 @@ sub _send_email { return unless $template; my $email_template = $config{periodic_invoices}->{email_template}; - my $filename = $email_template || ( ($user->get_config_value('templates') || "templates/webpages") . "/periodic_invoices_email.txt" ); + my $filename = $email_template || ( (SL::DB::Default->get->templates || "templates/webpages") . "/periodic_invoices_email.txt" ); my %params = ( POSTED_INVOICES => $posted_invoices, PRINTED_INVOICES => $printed_invoices ); @@ -232,7 +233,8 @@ sub _print_invoice { $form->{formname} = $form->{type}; $form->{format} = 'pdf'; $form->{media} = 'printer'; - $form->{OUT} = "| " . $config->printer->printer_command; + $form->{OUT} = $config->printer->printer_command; + $form->{OUT_MODE} = '|-'; $form->prepare_for_printing;