From fe24cd8d09b749a263342c765ddb0ab5920234e5 Mon Sep 17 00:00:00 2001
From: Robert Bays <robert@vyatta.com>
Date: Thu, 13 Jan 2011 17:11:49 -0800
Subject: silence the perl critic

---
 scripts/bgp/vyatta-bgp.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scripts/bgp/vyatta-bgp.pl')

diff --git a/scripts/bgp/vyatta-bgp.pl b/scripts/bgp/vyatta-bgp.pl
index 383f085a..2ccf4724 100755
--- a/scripts/bgp/vyatta-bgp.pl
+++ b/scripts/bgp/vyatta-bgp.pl
@@ -1270,7 +1270,7 @@ sub confed_iBGP_ASN {
 
     #my @neighbors = $config->listNodes('neighbor');
     my @neighbors = $config->listOrigNodes('neighbor');
-    foreach $neighbor (@neighbors) {
+    foreach my $neighbor (@neighbors) {
       my $remoteas = $config->returnValue("neighbor $neighbor remote-as");
       if ("$testas" eq "$remoteas") {
         exit 1;
-- 
cgit v1.2.3