From: Udo Spallek <info@wissensvermittlung.com>
Date: Thu, 22 Mar 2007 16:15:34 +0000 (+0000)
Subject: Bug: "my" variable $form masks earlier declaration in same scope at SL/DBUpgrade2.pm
X-Git-Tag: release-2.4.3^2~584
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=0cfb13d05adadebb86e9dab9bc1f2d3410ef1ee7;p=kivitendo-erp.git

Bug: "my" variable $form masks earlier declaration in same scope at SL/DBUpgrade2.pm
---

diff --git a/SL/DBUpgrade2.pm b/SL/DBUpgrade2.pm
index b63b74903..8cde113ea 100644
--- a/SL/DBUpgrade2.pm
+++ b/SL/DBUpgrade2.pm
@@ -122,7 +122,7 @@ sub _check_for_loops {
 sub _control_error {
   my ($form, $file_name, $message) = @_;
 
-  my $form = $main::form;
+  $form = $main::form;
   my $locale = $main::locale;
 
   $form->error(sprintf($locale->text("Error in database control file '%s': %s"),