From 370e2c91bf08a2cad84219a99c7d2274f4552d81 Mon Sep 17 00:00:00 2001
From: Martin Kamerbeek <martin@martintwee.oqapi.nl>
Date: Thu, 4 Nov 2010 13:52:15 +0100
Subject: [PATCH] Fix wrong array population. || operator works in scalar
 context!

---
 lib/WebGUI/Registration/Step/MailingSubscribe.pm | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/lib/WebGUI/Registration/Step/MailingSubscribe.pm b/lib/WebGUI/Registration/Step/MailingSubscribe.pm
index a9205cc..ac45c06 100644
--- a/lib/WebGUI/Registration/Step/MailingSubscribe.pm
+++ b/lib/WebGUI/Registration/Step/MailingSubscribe.pm
@@ -116,11 +116,9 @@ sub getViewVars {
         $options{ $mailing->getId } = $mailing->getTitle;
     };
 
-    my @subscribeMailings = (
-        $self->session->form->checkList( 'subscribeMailings' )
-     || @{ $self->getConfigurationData->{'subscribeMailings'} || [] }
-     || @subscribed
-    );
+    my @subscribeMailings = $self->session->form->checkList( 'subscribeMailings' );
+    @subscribeMailings    = @{ $self->getConfigurationData->{'subscribeMailings'} || [] } unless @subscribeMailings;
+    @subscribeMailings    = @subscribed unless @subscribeMailings;
 
     push @{ $var->{ field_loop } }, (
         {