From 0ee74224619e84abe3c4004fc8f756442574c3d9 Mon Sep 17 00:00:00 2001
From: Frank Becker <Frank@Frank-Becker.de>
Date: Wed, 24 Aug 2016 10:25:43 -0400
Subject: Bug 1296831 - allow answers file to override new install defaults

---
 Bugzilla/Config.pm | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/Bugzilla/Config.pm b/Bugzilla/Config.pm
index 79b468f0c..49918d5c1 100644
--- a/Bugzilla/Config.pm
+++ b/Bugzilla/Config.pm
@@ -36,6 +36,12 @@ use File::Basename;
   );
 Exporter::export_ok_tags('admin');
 
+# new installs get these set of defaults (unless overriden by the answers file)
+my %NEW_INSTALL_DEFAULT = (
+    or_groups          => 1,
+    use_email_as_login => 0,
+);
+
 # INITIALISATION CODE
 # Perl throws a warning if we use bz_locations() directly after do.
 our %params;
@@ -238,17 +244,15 @@ sub update_params {
             elsif (exists $answer->{$name}) {
                 $param->{$name} = $answer->{$name};
             }
+            elsif ($new_install and exists $NEW_INSTALL_DEFAULT{$name}) {
+                $param->{$name} = $NEW_INSTALL_DEFAULT{$name};
+            }
             else {
                 $param->{$name} = $item->{'default'};
             }
         }
     }
 
-    if ($new_install) {
-        $param->{'or_groups'} = 1;
-        $param->{'use_email_as_login'} = 0;
-    }
-
     # --- REMOVE OLD PARAMS ---
 
     my %oldparams;
-- 
cgit v1.2.3-24-g4f1b