diff options
| author | Perl Tidy <perltidy@bugzilla.org> | 2018-12-05 21:38:52 +0100 |
|---|---|---|
| committer | Dylan William Hardison <dylan@hardison.net> | 2018-12-05 23:49:08 +0100 |
| commit | 8ec8da0491ad89604700b3e29a227966f6d84ba1 (patch) | |
| tree | 9d270f173330ca19700e0ba9f2ee931300646de1 /qa/extensions/QA/lib/Util.pm | |
| parent | a7bb5a65b71644d9efce5fed783ed545b9336548 (diff) | |
| download | bugzilla-8ec8da0491ad89604700b3e29a227966f6d84ba1.tar.gz bugzilla-8ec8da0491ad89604700b3e29a227966f6d84ba1.tar.xz | |
no bug - reformat all the code using the new perltidy rules
Diffstat (limited to 'qa/extensions/QA/lib/Util.pm')
| -rw-r--r-- | qa/extensions/QA/lib/Util.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/qa/extensions/QA/lib/Util.pm b/qa/extensions/QA/lib/Util.pm index 9bc2d8dbb..9b9026343 100644 --- a/qa/extensions/QA/lib/Util.pm +++ b/qa/extensions/QA/lib/Util.pm @@ -11,15 +11,15 @@ use strict; use base qw(Exporter); our @EXPORT = qw( - parse_output + parse_output ); sub parse_output { - my ($output, $vars) = @_; + my ($output, $vars) = @_; - $vars->{error} = ($output =~ /software error/i) ? 1 : 0; - $vars->{output} = $output; - $vars->{bug_id} ||= ($output =~ /Created bug (\d+)/i) ? $1 : undef; + $vars->{error} = ($output =~ /software error/i) ? 1 : 0; + $vars->{output} = $output; + $vars->{bug_id} ||= ($output =~ /Created bug (\d+)/i) ? $1 : undef; } 1; |