X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4654d9931a51aaa867c425c1fc63618337df67e9..e20f3f0dac8c4b362af0e6594de9581d05d0f6c4:/bin/mozilla/ca.pl

diff --git a/bin/mozilla/ca.pl b/bin/mozilla/ca.pl
index c6070fbd1..eae613179 100644
--- a/bin/mozilla/ca.pl
+++ b/bin/mozilla/ca.pl
@@ -526,6 +526,12 @@ sub list_transactions {
 
   push @options, $period;
 
+  $form->{print_date} = $locale->text('Create Date') . " " . $locale->date(\%myconfig, $form->current_date(\%myconfig), 0);
+  push (@options, $form->{print_date});
+
+  $form->{company} = $locale->text('Company') . " " . $myconfig{company};
+  push (@options, $form->{company});
+
   my @columns     = qw(transdate reference description gegenkonto debit credit ustkonto ustrate balance);
   my %column_defs = (
     'transdate'   => { 'text' => $locale->text('Date'), },