From 28a1de6319da8b481b9b5ec08f070bce65e17bb3 Mon Sep 17 00:00:00 2001
From: Dylan William Hardison <dylan@hardison.net>
Date: Fri, 4 Aug 2017 13:09:47 -0400
Subject: Bug 1387459 - Tidy the Bugzilla/Config/*.pm modules

---
 Bugzilla/Config/Auth.pm | 263 ++++++++++++++++++++++++------------------------
 1 file changed, 131 insertions(+), 132 deletions(-)

(limited to 'Bugzilla/Config/Auth.pm')

diff --git a/Bugzilla/Config/Auth.pm b/Bugzilla/Config/Auth.pm
index 9e1f89ef9..dddedd819 100644
--- a/Bugzilla/Config/Auth.pm
+++ b/Bugzilla/Config/Auth.pm
@@ -16,138 +16,137 @@ use Bugzilla::Config::Common;
 our $sortkey = 300;
 
 sub get_param_list {
-  my $class = shift;
-  my @param_list = (
-  {
-   name => 'auth_env_id',
-   type    => 't',
-   default => '',
-  },
-
-  {
-   name    => 'auth_env_email',
-   type    => 't',
-   default => '',
-  },
-
-  {
-   name    => 'auth_env_realname',
-   type    => 't',
-   default => '',
-  },
-
-  # XXX in the future:
-  #
-  # user_verify_class and user_info_class should have choices gathered from
-  # whatever sits in their respective directories
-  #
-  # rather than comma-separated lists, these two should eventually become
-  # arrays, but that requires alterations to editparams first
-
-  {
-   name => 'user_info_class',
-   type => 's',
-   choices => [ 'CGI', 'Env', 'Env,CGI' ],
-   default => 'CGI',
-   checker => \&check_multi
-  },
-
-  {
-   name => 'user_verify_class',
-   type => 'o',
-   choices => [ 'DB', 'RADIUS', 'LDAP' ],
-   default => 'DB',
-   checker => \&check_user_verify_class
-  },
-
-  {
-   name => 'rememberlogin',
-   type => 's',
-   choices => ['on', 'defaulton', 'defaultoff', 'off'],
-   default => 'on',
-   checker => \&check_multi
-  },
-
-  {
-   name => 'requirelogin',
-   type => 'b',
-   default => '0'
-  },
-
-  {
-   name => 'webservice_email_filter',
-   type => 'b',
-   default => 0
-  },
-
-  {
-   name => 'emailregexp',
-   type => 't',
-   default => q:^[\\w\\.\\+\\-=]+@[\\w\\.\\-]+\\.[\\w\\-]+$:,
-   checker => \&check_regexp
-  },
-
-  {
-   name => 'emailregexpdesc',
-   type => 'l',
-   default => 'A legal address must contain exactly one \'@\', and at least ' .
-              'one \'.\' after the @.'
-  },
-
-  {
-   name => 'emailsuffix',
-   type => 't',
-   default => ''
-  },
-
-  {
-   name => 'createemailregexp',
-   type => 't',
-   default => q:.*:,
-   checker => \&check_regexp
-  },
-
-  {
-   name => 'password_complexity',
-   type => 's',
-   choices => [ 'no_constraints', 'bmo' ],
-   default => 'no_constraints',
-   checker => \&check_multi
-  },
-
-  {
-   name => 'password_check_on_login',
-   type => 'b',
-   default => '1'
-  },
-  {
-   name => 'auth_delegation',
-   type => 'b',
-   default => 0,
-  },
-
-  {
-   name => 'duo_host',
-   type => 't',
-   default => '',
-  },
-  {
-   name => 'duo_akey',
-   type => 't',
-   default => '',
-  },
-  {
-   name => 'duo_ikey',
-   type => 't',
-   default => '',
-  },
-  {
-   name => 'duo_skey',
-   type => 't',
-   default => '',
-  },
-  );
-  return @param_list;
+    my $class      = shift;
+    my @param_list = (
+        {
+            name    => 'auth_env_id',
+            type    => 't',
+            default => '',
+        },
+
+        {
+            name    => 'auth_env_email',
+            type    => 't',
+            default => '',
+        },
+
+        {
+            name    => 'auth_env_realname',
+            type    => 't',
+            default => '',
+        },
+
+        # XXX in the future:
+        #
+        # user_verify_class and user_info_class should have choices gathered from
+        # whatever sits in their respective directories
+        #
+        # rather than comma-separated lists, these two should eventually become
+        # arrays, but that requires alterations to editparams first
+
+        {
+            name    => 'user_info_class',
+            type    => 's',
+            choices => [ 'CGI', 'Env', 'Env,CGI' ],
+            default => 'CGI',
+            checker => \&check_multi
+        },
+
+        {
+            name    => 'user_verify_class',
+            type    => 'o',
+            choices => [ 'DB', 'RADIUS', 'LDAP' ],
+            default => 'DB',
+            checker => \&check_user_verify_class
+        },
+
+        {
+            name    => 'rememberlogin',
+            type    => 's',
+            choices => [ 'on', 'defaulton', 'defaultoff', 'off' ],
+            default => 'on',
+            checker => \&check_multi
+        },
+
+        {
+            name    => 'requirelogin',
+            type    => 'b',
+            default => '0'
+        },
+
+        {
+            name    => 'webservice_email_filter',
+            type    => 'b',
+            default => 0
+        },
+
+        {
+            name    => 'emailregexp',
+            type    => 't',
+            default => q:^[\\w\\.\\+\\-=]+@[\\w\\.\\-]+\\.[\\w\\-]+$:,
+            checker => \&check_regexp
+        },
+
+        {
+            name    => 'emailregexpdesc',
+            type    => 'l',
+            default => 'A legal address must contain exactly one \'@\', and at least ' . 'one \'.\' after the @.'
+        },
+
+        {
+            name    => 'emailsuffix',
+            type    => 't',
+            default => ''
+        },
+
+        {
+            name    => 'createemailregexp',
+            type    => 't',
+            default => q:.*:,
+            checker => \&check_regexp
+        },
+
+        {
+            name    => 'password_complexity',
+            type    => 's',
+            choices => [ 'no_constraints', 'bmo' ],
+            default => 'no_constraints',
+            checker => \&check_multi
+        },
+
+        {
+            name    => 'password_check_on_login',
+            type    => 'b',
+            default => '1'
+        },
+        {
+            name    => 'auth_delegation',
+            type    => 'b',
+            default => 0,
+        },
+
+        {
+            name    => 'duo_host',
+            type    => 't',
+            default => '',
+        },
+        {
+            name    => 'duo_akey',
+            type    => 't',
+            default => '',
+        },
+        {
+            name    => 'duo_ikey',
+            type    => 't',
+            default => '',
+        },
+        {
+            name    => 'duo_skey',
+            type    => 't',
+            default => '',
+        },
+    );
+    return @param_list;
 }
 
 1;
-- 
cgit v1.2.3-24-g4f1b