X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/eb00db46a38d4e447aa6af7ead58eb386d7494ab..80050a8:/bin/mozilla/ar.pl
diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl
index 4ec9f542f..2e82596cf 100644
--- a/bin/mozilla/ar.pl
+++ b/bin/mozilla/ar.pl
@@ -219,7 +219,6 @@ sub form_header {
my ($title, $readonly, $exchangerate, $rows);
my ($notes, $department, $customer, $employee, $amount, $project);
- my ($onload);
my ($ARselected);
@@ -326,9 +325,6 @@ sub form_header {
qq|| .
qq||;
- $onload = qq|focus()|;
- $onload .= qq|;setupPoints('|. $myconfig{numberformat} .qq|', '|. $locale->text("wrongformat") .qq|')|;
-
# $amount = $locale->text('Amount');
# $project = $locale->text('Project');
@@ -443,7 +439,6 @@ sub form_header {
project_labels => \%project_labels,
rows => $rows,
ARselected => $ARselected,
- onload => $onload,
title_str => $title,
follow_up_trans_info => $follow_up_trans_info,
});
@@ -547,8 +542,6 @@ $follow_ups_block
print "
-
-
";
$main::lxdebug->leave_sub();
@@ -849,8 +842,6 @@ sub delete {
delete $form->{header};
print qq|
-