diff options
author | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2011-03-08 10:13:22 -0800 |
---|---|---|
committer | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2011-03-08 10:13:22 -0800 |
commit | 1e9ec0751a0cf847047e054f06e5cb59b81abdec (patch) | |
tree | 8f26309d2cc9a57b6c7b812171c6f46d7563ac44 | |
parent | 004f012b311ba08550654669284ddce6d0934f4b (diff) | |
download | vyatta-cfg-quagga-1e9ec0751a0cf847047e054f06e5cb59b81abdec.tar.gz vyatta-cfg-quagga-1e9ec0751a0cf847047e054f06e5cb59b81abdec.zip |
Fix perl critic warnings
Vyatta/Quagga/Config.pm
"return" statement with explicit "undef" at line 359, column 12. See page 199 of PBP. (Severity: 5)
"return" statement with explicit "undef" at line 364, column 10. See page 199 of PBP. (Severity: 5)
-rw-r--r-- | lib/Vyatta/Quagga/Config.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Vyatta/Quagga/Config.pm b/lib/Vyatta/Quagga/Config.pm index 1177f97d..3c3187e0 100644 --- a/lib/Vyatta/Quagga/Config.pm +++ b/lib/Vyatta/Quagga/Config.pm @@ -356,12 +356,12 @@ sub _qCommandFind { if (exists $qcom->{$token}->{$action}) { $command = $token; } elsif (exists $qcom->{"$command $token"}->{$action}) { $command = "$command $token"; } elsif (exists $qcom->{"$command var"}->{$action}) { $command = "$command var"; } - else { return undef; } + else { return; } } # return hash key if Quagga command template string is found if (defined $qcom->{$command}->{$action}) { return $command; } - else { return undef; } + else { return; } } # translate the adds/changes in a Vyatta config tree into Quagga vtysh commands. |