From ba816a702284a7f5a78c4999b0df89749328f806 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20B=C3=BCren?= Date: Tue, 14 Oct 2014 19:23:39 +0200 Subject: [PATCH] lexical in postif fix MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit falls my deklariert ist, nicht danach mit if prüfen s.a. chat: grund warum das ekelig ist: das wird intern übersetzt in if (cond) { my $var = ... } --- bin/mozilla/oe.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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, -- 2.20.1