From 8ec8da0491ad89604700b3e29a227966f6d84ba1 Mon Sep 17 00:00:00 2001 From: Perl Tidy Date: Wed, 5 Dec 2018 15:38:52 -0500 Subject: no bug - reformat all the code using the new perltidy rules --- extensions/GoogleAnalytics/lib/Config.pm | 41 +++++++++++++++----------------- 1 file changed, 19 insertions(+), 22 deletions(-) (limited to 'extensions/GoogleAnalytics/lib/Config.pm') diff --git a/extensions/GoogleAnalytics/lib/Config.pm b/extensions/GoogleAnalytics/lib/Config.pm index f9e003ce0..1c453ff74 100644 --- a/extensions/GoogleAnalytics/lib/Config.pm +++ b/extensions/GoogleAnalytics/lib/Config.pm @@ -14,28 +14,25 @@ use warnings; use Bugzilla::Config::Common; sub get_param_list { - my ($class) = @_; - - my @params = ( - { - name => 'google_analytics_tracking_id', - type => 't', - default => '', - checker => sub { - my ($tracking_id) = (@_); - - return 'must be like UA-XXXXXX-X' unless $tracking_id =~ m{^(UA-[[:xdigit:]]+-[[:xdigit:]]+)?$}; - return ''; - } - }, - { - name => 'google_analytics_debug', - type => 'b', - default => 0 - }, - ); - - return @params; + my ($class) = @_; + + my @params = ( + { + name => 'google_analytics_tracking_id', + type => 't', + default => '', + checker => sub { + my ($tracking_id) = (@_); + + return 'must be like UA-XXXXXX-X' + unless $tracking_id =~ m{^(UA-[[:xdigit:]]+-[[:xdigit:]]+)?$}; + return ''; + } + }, + {name => 'google_analytics_debug', type => 'b', default => 0}, + ); + + return @params; } 1; -- cgit v1.2.3-24-g4f1b