From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 2 Nov 2015 13:41:08 +0000 (+0100)
Subject: Hash-Zuweisung mit ungerader Anzahl Elemente vermeiden
X-Git-Tag: release-3.4.1~607
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/22744c20f79af700675837d8183bcd1ac8840a11?hp=8f3e8a0254bc848d02958cc5e1fcdf600d5632a8

Hash-Zuweisung mit ungerader Anzahl Elemente vermeiden

In einem Hash wird eine leere Liste im ternären Ausdruck nun mal im
Listenkontext ausgewertet… und dadurch ist bei so einem Konstrukt die
rechte Seite potenziell leer (sie enthält kein Argument):

my %h = ( whatever => test() ? 1 : () );
---

diff --git a/SL/Layout/Top.pm b/SL/Layout/Top.pm
index 47ab065fb..e2e5d2df6 100644
--- a/SL/Layout/Top.pm
+++ b/SL/Layout/Top.pm
@@ -8,7 +8,7 @@ sub pre_content {
 
   $self->presenter->render('menu/header',
     now        => DateTime->now_local,
-    is_fastcgi => $::dispatcher ? scalar($::dispatcher->interface_type =~ /fastcgi/i) : (),
+    is_fastcgi => $::dispatcher ? scalar($::dispatcher->interface_type =~ /fastcgi/i) : 0,
     is_links   => scalar($ENV{HTTP_USER_AGENT}         =~ /links/i),
   );
 }