From edbbcd907e745c6a682c2eb18abf137c4ed3f1fd Mon Sep 17 00:00:00 2001
From: Stig Thormodsrud <stig@vyatta.com>
Date: Mon, 16 Mar 2009 18:07:52 -0700
Subject: isClusterIP() needs to strip off the /mask/interface/bcast.

---
 lib/Vyatta/Misc.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/Vyatta/Misc.pm')

diff --git a/lib/Vyatta/Misc.pm b/lib/Vyatta/Misc.pm
index eccd715..533a01f 100755
--- a/lib/Vyatta/Misc.pm
+++ b/lib/Vyatta/Misc.pm
@@ -213,7 +213,7 @@ sub isClusterIP {
     foreach my $cluster_group (@cluster_groups) {
 	my @services = $vc->returnValues("cluster group $cluster_group service");
 	foreach my $service (@services) {
-	    if ($ip eq $service) {
+	    if ($ip eq substr($service,0,index($service,'/'))) {
 		return 1;
 	    }
 	}
-- 
cgit v1.2.3