From: Thomas Berezansky <tsbere@mvlc.org>
Date: Wed, 7 Mar 2012 21:42:21 +0000 (-0500)
Subject: Stop warning about missing parentheses...
X-Git-Tag: osrf_rel_2_1_0-alpha1~3
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=fd92a859e2ba3eeeaafe4904cd04973eb8cd572b;p=OpenSRF.git

Stop warning about missing parentheses...

...by adding them.

Signed-off-by: Thomas Berezansky <tsbere@mvlc.org>
---

diff --git a/src/perl/lib/OpenSRF/Application/Validator.pm b/src/perl/lib/OpenSRF/Application/Validator.pm
index dc9b072..db2dce2 100644
--- a/src/perl/lib/OpenSRF/Application/Validator.pm
+++ b/src/perl/lib/OpenSRF/Application/Validator.pm
@@ -31,7 +31,7 @@ sub do_validate {
     my @validator_names = sort keys %$validators;
     my $additionals = ();
 
-    my $submodulename, $submodule;
+    my ($submodulename, $submodule);
     while($return->{valid} && ($submodulename = shift @validator_names)) {
         $submodule = $validators->{$submodulename};
         my $implementation = $submodule->{implementation};