Quiet another debugging print statement.

5fc0dde5 · Leigh B. Stoller · 1cf3aeba · 5fc0dde5
Commit 5fc0dde5 authored Jul 11, 2008 by Leigh B. Stoller
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

db/Lan.pm.in db/Lan.pm.in +2 -1

No files found.
--- a/db/Lan.pm.in
+++ b/db/Lan.pm.in
@@ -353,7 +353,8 @@ sub CompareVlansWithSwitches($$$)

 	my $vlan = VLan->Lookup($experiment, $vname);
 	if (!defined($vlan) || $vlan->type ne "vlan") {
-	    print STDERR "$vname is not right!\n";
+	    print STDERR "$vname is not a vlan!\n"
+		if (defined($vlan));
 	    push(@changed, $oldid);
 	    next;
 	}