Minor big fix.

1372580e · Leigh B Stoller · 84f79f51 · 1372580e
Commit 1372580e authored May 07, 2012 by Leigh B Stoller
Hide whitespace changes
Inline Side-by-side

Showing with 7 additions and 3 deletions

db/Node.pm.in db/Node.pm.in +7 -3

No files found.
--- a/db/Node.pm.in
+++ b/db/Node.pm.in
@@ -2473,9 +2473,13 @@ sub SetNodeHistory($$$$)
 	    print STDERR
 		"*** SetNodeHistory: No control interface for $self\n";
 	}
-	$cnet_ip = $interface->IP();
-	if (!defined($cnet_ip) || $cnet_ip eq "") {
-	    print STDERR "*** SetNodeHistory: No control IP for $interface\n";
+	else {
+	    $cnet_ip = $interface->IP();
+	    if (!defined($cnet_ip) || $cnet_ip eq "") {
+		print STDERR
+		    "*** SetNodeHistory: No control IP for $interface\n";
+		$cnet_ip = undef;
+	    }
 	}
 	$phys_nodeid = $self->phys_nodeid();
    }