From 1e9ec0751a0cf847047e054f06e5cb59b81abdec Mon Sep 17 00:00:00 2001 From: Stephen Hemminger Date: Tue, 8 Mar 2011 10:13:22 -0800 Subject: 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) --- lib/Vyatta/Quagga/Config.pm | 4 ++-- 1 file 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. -- cgit v1.2.3