From: Jan Büren <jan@kivitendo-premium.de>
Date: Tue, 14 Oct 2014 17:23:39 +0000 (+0200)
Subject: lexical in postif fix
X-Git-Tag: release-3.2.0beta~293
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/ba816a702284a7f5a78c4999b0df89749328f806?ds=inline;hp=--cc

lexical in postif fix

falls my deklariert ist, nicht danach mit if prüfen
s.a. chat:
<gorash> grund warum das ekelig ist: das wird intern übersetzt in if (cond) { my $var = ... }
---

ba816a702284a7f5a78c4999b0df89749328f806
diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index 459c62948..7e38f8e56 100644
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -564,7 +564,8 @@ sub form_footer {
 
   $TMPL_VAR{ALL_DELIVERY_TERMS} = SL::DB::Manager::DeliveryTerm->get_all_sorted();
 
-  my $tpca_reminder = check_transport_cost_reminder_article_number() if $::instance_conf->get_transport_cost_reminder_article_number_id;
+  my $tpca_reminder;
+  $tpca_reminder = check_transport_cost_reminder_article_number() if $::instance_conf->get_transport_cost_reminder_article_number_id;
   print $form->parse_html_template("oe/form_footer", {
      %TMPL_VAR,
      webdav          => $::instance_conf->get_webdav,